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sr voor MSX, we kunnen het helaas niet anders stellen. De 
van nogal wat hardware leveranciers, zoals Sony, dat men 
1987 nog met nieuwe machines zou uitkomen, zijn wegge- 
ware-gebied rommelt het behoorlijk, maar ook daar betreft 
gevechten. Sommige leveranciers duiken weg in sterfhuis¬ 
dumpen hun voorraden op de markt tegen afbraakprijzen, 
kelier het niet eens meer in de winkel wiHiebben. _ 

nige steunpilaar, en probeert met name door heUatenont- 
darsoft programma’s nog wat vaart in het geheel te houden, 
lichten voor 1988 zijn bepaald niet, dat we nog een grootse 
en. Er blijft een markt voor MSX, zeker voor de huiskamer 
met de brede reeks randapparatuur kan men er erg veel 
de groei is er uit. Het wordt een zogenaamde "aftermarket", 
i oude voorraden, hier en daar wat enkelingen met een 
ng, maar voor het komende jaar toch voornamelijk con- 
C-dagen waren in dit opzicht duidelijk het keerpunt, er was 
te doen voor MSX. 

jr geval ook deze keer weer onze eerlijke 


en wen 


' : ' : ' 
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Basis Basic cursus 14 4 

Jan Bodzinga leidt ons verder bij het 
opzetten van een database in Basic. 

Sprite Detector 11 

Het exact vaststellen van plaats en 
positie van sprites is een goede hulp 
bij het maken en gebruiken van deze 
figuren. 


Lesmaker 14 

Een Basic programma voor gebruik in 
het onderwijs, waarbij men naar eigen 
inzicht te werk kan gaan. 


MC-Split 16 

Het vertalen van bestanden van cas¬ 
sette naar diskette kan veel voordelen 
opleveren. Wim van der Kuilen 
schreef een routine voor MSX-1, 64 
Kb-computers. 


Sprites 20 

Een nieuwe aflevering in de serie over 
het grafisch werken met MSX 


tikel gaat in op de werkelijke kwali¬ 
teiten van deze techniek. 

HCC-dagen ’87 55 

Een terugblik op de grote beurs van 
deze landelijke computerclub. 

Hifi-schakelunits 57 

Computerstoring voor audioappara- 
tuur ligt nu binnen handbereik. 

Garbage Collection 60 

Een handig programma, waarmee het 
‘vastslaan’ van de computer kan wor¬ 
den voorkomen. 

Nieuwe software 61 

De nieuwe games van Radarsoft, die 
een bespreking zeker waard zijn. 

MSX-slot 64 

Een artikel van Paul Vanschandevyl 
over de mogelijkheden, die geheu- 
gen-slots de MSX-gebruiker kunnen 
bieden. 


Home Automation 47 

Het huis van de toekomst heeft be¬ 
hoefte aan een centrale communica- 
tie-ader, de Home-BUS en aan een 
concept voor het bedienen en con¬ 
troleren van automatische hulpjes. 


Videoprocessing 51 

Het werken met video vereist meer 
dan alleen hard- en software. Dit ar- 


Listing PRINT-OUT 27 

Weer een groot aantal pagina’s met 
leuke listings, en natuurlijk onze ver¬ 
trouwde listingtester. 
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Kleine advertenties 26 
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Nieuw van Radarsofi 

voor IV1SX-II 


RADX-8 


f l49»" 


Een avonturenspel voor jong en oud. 

Er gebeuren vreemde dingen in de plaatselijke 
dierentuin. Aan u de taak om achterset mysterie te komen. 


Bescherm met je space-jet de planeet tegen aanvallen van buiten af. 
Met prachtige effekten! 


Dynamic Publisher 

Ook voor MSX is er nu een DeskTop Publishing programma en nog 

wel van eigen bodem. Radarsoft maakte op verzoek van Philips voor MSX-2 een 

origineel pakket om deze „mode”-toepassing ook binnen het bereik 

van de MSX-gebruikers te brengen. 


% 


BREAKER 


Baan je een weg door een doolhof van gangen en velden (500 stuks!) 
en haal met de vijf ballen de eindstreep! 


SALASAN 

Kwaliteitssoftware voor MSX 


Postbus 5570, 1007 AN Amsterdam 

® 020-273198 


Dealeraanvragen welkom 

Alle prijzen inklusief BTW en verzendkosten. 
Levering bij vooruitbetaling op giro 5641219 van 
Salasan Amsterdam met vermelding van het be¬ 
treffende programma. Rembourszendingen zijn 
mogelijk, maar daarvoor brengen we ƒ 5,- in reke¬ 
ning. Omruilgarantie voor modules, laadfouten¬ 
garantie bij cassettes. Uitsluitend originele soft- 
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We zijn inmiddels al een eind op weg met onze Basic cursus. In de afgelopen 13 lessen hebben we 
al heel wat over Basic kunnen leren en de nodige programma’s geschreven. De moeilijkheidsgraad 
is daardoor inmiddels gestegen tot het niveau van een aankomend programmeur. Toch probeert Jan 
Bodzinga, waar het maar mogelijk is, de stof voor iedereen begrijpelijk te houden. Daardoor kunnen 
ook de nieuwe lezers van dit blad nog altijd 'aanloggen’ en meedoen. De cursus is zo opgezet, dat 
zelfs de nieuwelingen op computergebied stap voor stap kan worden ingewijd’in de geheimen die de 
computer voor ons in petto heeft. 


Basis Basic 


Deel 14: Een Database (III) 

I n de voorgaande afleveringen zijn we begonnen met de opzet voor een 
professioneel ogend database-programma. De listing is opgezet voor een 
adressenbestand, maar kan door de gebruiker zelf gemakkelijk worden aan¬ 
gepast aan andere door hem of haar gewenste toepassingen. Het geheel is 
een vrij ingewikkeld Basicprogramma, maar door een goede structuur en 
opzet van de listing is het relatief eenvoudig om de diverse subroutines te 
kunnen lokaliseren en eventueel aan te passen. 


Tot op dit moment hebben we alle 
universele subroutines die in het 
programma voorkomen behandeld, 
terwijl ook het hoofdmenu en het 
toevoegen van gegevens als routines 
inmiddels zijn behandeld. Vooral de 
principes van gegevensbestanden 
komen aan de orde. Aan het eind van 
deze les zijn we zeker weer een heel 
stuk verder met dit fraaie stuk 
programmeerwerk. 

Wat vooraf ging. De vorige afleverin¬ 
gen hebben we voor het grootste deel 
gewijd aan het opzetten van dit 
programma. Als eerste zijn we uit¬ 
voering ingegaan op de diverse ar- 
rays. Een array is een verzameling 
van gegevens, die onder dezelfde 
noemer in een programma voorkomt. 
We kunnen op die manier erg veel, 
min of meer identieke, gegevens 
gemakkelijk verwerken. Daardoor zijn 
we zo flexibel, dat het voor een 
programma weinig uitmaakt, of we nu 
bijvoorbeeld 20 records of 2000 
records in het programma willen ver¬ 
werken. Uiteraard is het beschikbare 
geheugen daar wel bij van belang. Het 
programma in casu verandert echter 
in ’t geheel niet door de grote hoeveel¬ 
heid data. 


De opzet van ons programma is struc¬ 
tureel. Dat wil zoveel zeggen als voor 
iedere bewerking of onderdeel daar¬ 
van een strict eigen gebied in de 
programma-listing, waar dan ook 
niets anders kan en mag gebeuren. 
Ofwel als er een invoer voor JA of Nee 
wordt gevraagd, dan hebben we daar 
een aparte (sub)routine voor. Zo gaat 
het ook met alle andere bewerkingen 
in het programma. De indeling van 
onze listing is verdeeld is 13 gedeel¬ 
tes. We zullen voor de volledigheid 
het geheel nog even op een rij zetten: 
0000 - 0100 REM programmatitel 
0100 - 0300 Initialisatie 
0300 -1000 Diverse subroutines 
1000 - 2000 Programma 
(start)menu 
2000 - 3000 Toevoegen 
3000 - 4000 Muteren 
4000 - 5000 Verwijderen 
5000 - 6000 Printen 
6000 - 7000 Sorteren 
7000 - 8000 Zoeken 
8000 - 9000 Inlezen 
9000 - 9500 Wegschrijven 
9500 - 9999 Stoppen 

Al deze onderdelen zitten op een vas¬ 
te plek in de complete listing. We heb¬ 
ben dit zo geschreven, om ook later 



op een snelle en handige manier wij¬ 
zigingen en verbeteringen in het 
programma te kunnen aanbrengen. 
We hoeven maar op het programma¬ 
schema te kijken om te weten in welke 
regels we een bepaalde module moe¬ 
ten zoeken. Daardoor lopen we de 
minste kans om op een verkeerde 
plaats de wijzigingen in het program¬ 
ma aan te brengen, wat op z’n beurt 
weer een grote tijdwinst kan beteke¬ 
nen. De met een (*) asterix gemerkte 
modules zijn in de vorige lessen uit¬ 
voerig aan de orde gekomen. Aan het 
eind van deze les zullen we een com¬ 
plete listing geven van alle tot nu toe 
behandelde onderdelen van het 
programma. 


Muteren. 

Het muteren of wijzigen van gegevens 
in ons adressenprogramma is een we¬ 
zenlijk onderdeel van goed gegevens¬ 
beheer. Er zijn in het verleden al heel 
wat theoriën over gemaakt, hoe dat 
optimaal in z’n werk moet gaan. We 
zullen ons met deze ingewikkelde 
materie niet verder inlaten dan nodig 
is. Wel moetje weten, dat het wijzigen 
van een record inhoudt, dat de oude 
data die in het bepaalde record aan- 
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wezig was wordt vervangen door 
nieuwe gegevens. 

Het muteren kan bijvoorbeeld nodig 
zijn, als een van de personen die in 
ons adressenbestand voorkomt een 
ander adres heeft gekregen. Ook bij 
aanvulling van de bestaande 
gegevens moet er worden gemuteerd. 
De grootte van het record in de array 
blijft bij het muteren echter altijd gelijk. 
Alleen de data in het record kan wij¬ 
zigen. We moeten ons eerst terdege 
afvragen wat er allemaal wel en juist 
niet gebeurt, als we een record geheel 
of gedeeltelijk gaan wijzigen. Als eer¬ 
ste (en enige) worden de gegevens in 
het bewuste record veranderd. Dat 
betekent, dat de lengte van dit record 
werken met sequentiële bestanden¬ 
kan wijzigen. Het totaal aantal re¬ 
cords, of adressen in het bestand wij¬ 
zigt echter niet. Dit is iets, wat we in de 
gaten moeten houden bij het program¬ 
meren. 

Hoe gaat nu het wijzigen op papier in 
z’n werk ? We moeten natuurlijk eerst 
weten welk record we willen gaan 
veranderen. De meest omslachtige 
methode is, om alle bestaande 
records stuk voor stuk op het scherm 
te laten verschijnen en bij elk adres te 
vragen of dit wellicht veranderd moet 
worden. Dat is uiteraard een leuk 
tijdverdrijf, maar handig is het aller¬ 
minst. We zullen er iets op moeten 
vinden, om tamelijk snel het te wij¬ 
zigen record boven water te krijgen. 
De eerste bewerking bij het wijzigen 
bestaat dus uit het opzoeken van het 
bewuste record. Het gezochte record 
moet ter controle op het scherm wor¬ 
den geprint. Daarna moeten we via 
communicatie met de gebruiker 
vasstellen of dit het juiste adres is wat 
moet worden gemuteerd. De derde 
stap is dus het definitieve besluit om 
het zojuist gezochte adres te gaan wij¬ 
zigen. 

Als vierde in de reeks handelingen 
moeten we de nieuwe gegevens per 
veld invoeren. Daarna volgt opnieuw 
een controle op de ingevoerde 
gegevens en als laatste moeten de 
oude gegevens uit het bestand (de 
tweedimensionele array) worden ver¬ 
vangen door de nieuwe, zojuist in¬ 
getypte data. 

Al met al een hele rij handelingen, die 
we stuk voor stuk moeten afwerken tij¬ 
dens het muteren. Voor alle duide- 
lijkheidheid geeft ik hier nog even de 
volgorde van de mutatie-batch: 


MUTATIE-batch 

1 Zoeken 

2 Printen 

3 Controle 


4 Invoeren 

5 Controle 

6 Vervangen 

De eerste bewerking, het zoeken, 
kunnen we ook terugvinden als een 
aparte module in het hoofdmenu. De 
daarvoor gereserveerde programma¬ 
regels bevinden zich tussen 7000 en 
8000. Het zou dom zijn, als we voor 
het werken met het mutatie-gedeelte 
geen gebruik van de nog te schrijven 
module voor het zoeken zouden ma¬ 
ken. Daarom lijkt het verstandig eerst 
de zoekmodule te schrijven en vervol¬ 
gens te bespreken. 

Zoeken 

Het opzoeken van records gaat in ons 
programma vanuit het computerge¬ 
heugen. We zijn in deze serie nog niet 
zover, dat we een adressenbestand 
vanaf de tape of disk zullen gaan 
benaderen. Hier lopen we ook tegen 
een van de grenzen van de 
mogelijkheden van het programma 
op. Het maximum aantal adressen 
wat in ons bestand kan worden ver¬ 
werkt is afhankelijk van de grootte per 
record en uiteraard de ruimte aan vrije 
bytes in het computergeheugen. 
Gemiddeld neemt een record zo’n 100 
bytes geheugen in beslag, waardoor 
we dus met 20.000 Bytes Free nog al¬ 
tijd 200 adressen per bestand kunnen 
verwerken. Daarnaast is het natuurlijk 
altijd mogelijk om meerdere bestan¬ 
den met verschillende namen met dit 
programmate kunnen verwerken. Het 
opzoeken van records in dit adressen¬ 
bestand kan vanwege de (geschatte) 
maximale hoeveelheid adressen per 
bestand gebeuren op de meest sim¬ 
pele manier. Dat betekent, dat de 
gebruiker wordt gevraagd, op welke 
veldsoort (naam, straat, postcode 
etc.) er moet worden gezocht. Nadat 
het veldtype door de gebruiker is in¬ 
gegeven, gaan we met een lus door 
het complete bestand, om de 
gezochte code te vergelijken met de 
inhoud van het bewuste veld. Vinden 
we een ’match’, waar zoekcode en 
veld gelijk zijn, dan wordt het com¬ 
plete record op het scherm geprint. 
Daarna zoeken we verder naar een 
eventueel volgend identiek veld, om 
ook dit record te printen en zo gaat 
men verder tot het eind van het be¬ 
stand. 

Het zoeken gaat in de echte 
databases meestal op een wat 
geavanceerder manier. Men gaat dan 
uit van een zogenaamde ’zoekindex’. 
Dat betekent, dat het hele bestand 
moet worden gecatalogiseerd; er 
wordt een aparte ’index’ van gemaakt, 
waarin dan alleen van bijvoorbeeld 


het veld 'Postcode’ de gegevens 
voorkomen, met daarachter het (logis¬ 
che) nummer van het record. Op die 
manier kan men snel te zoeken en 
sorteren op enorme hoeveelheden 
adressen. In ons geval, met vaak niet 
meer dan 200 entries, hoeven we niet 
zo ver te gaan, dat we aparte indexen 
bouwen voor de velden waarop het 
meeste naar gegevens zal woren 
gezocht. 


Zoekmethode 

Nadeel bij de door ons gevolgde me¬ 
thode is natuurlijk de snelheid. Daar 
zullen we echter niet zoveel van mer¬ 
ken, omdat de bestanden relatief klein 
blijven. Het grote voordeel van onze 
zoek-module is echter het feit, dat we 
zo hebben geprogrammeerd, dat het 
voor de gebruiker mogelijk is, om op 
ieder gewenst veld het bestand af te 
'scannen’ op zoek naar de gevraagde 
gegevens. En dat alles ook nog, zon¬ 
der veel extra regels aan het program¬ 
ma toe te voegen. Het geheim van 
deze manier schuilt in de twee-di- 
mensionele array A$(.) die we 
gebruiken om de adresrecords in op 
te slaan. Laten we de listing van het 
zoekgedeelte maar eens bekijken; 

7000 GOSUB 500 : REM kopprint 

701OPRINT:PRINT"Geef sleutelveld 

7020 FOR II = 0 TO 5 
7030 PRINT 11+1- ";VN$(II) 

7040 NEXTII 

7050 PRINT : PRINT "Maak een 

kGUZG n ’ 

7060 GOSUB 800 : REM lees toets 
7070 KK = VAL(T$) 

7080 IF KK <1 OR KK > 7 THEN 

7050 

7090 IF KK = 7 THEN 

RETURN:REM menu 
7100 VL = KK-1 : REM veldsoort 

Het eerste deel van de zoekmodule 
houdt zich bezig met de invoer van het 
'sleutelveld'. Daarmee wordt het veld 
in het adressenrecord bedoeld, waar¬ 
in het zoekgegeven moet worden ge¬ 
zocht. Om deze routine zo universeel 
en efficiënt mogelijk te maken, kunnen 
we -zoals eerder opgemerkt- de zoek¬ 
code ingeven voor alle beschikbare 
velden. Weliswaar gaat ons program¬ 
ma niet verder dan slechts een zoek¬ 
code per keer, maar het is niet erg 
moeilijk dit later zelf uit te breiden tot 
meerdere condities. Dan zou je bij¬ 
voorbeeld alle namen die beginnen 
met een ’B’ en daarnaast een post¬ 
code hebben die begin met ’12’ uit het 
bestand kunnen 'filteren’. Ons geval 
beperkt zich tot een conditie. Maar de- 
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TURBO 5000 

DE UNIVERSELE UTILITY CARTRIDGE VOOR MSX 1 EN 2 


☆ HARDCOPY 

- Drukt elk aktief beeldscherm af op de printer. Routines voor alle 
9 MSX schermen. Tekstschermen 0 en 1 naar elke printer. Grafi¬ 
sche en multicolorschermen naar MSX- IBM- en Epson compati¬ 
ble printers. Drie snelheden en zestien grijstinten. Te printen 
beeldveld naar keuze. 

☆ TURBOLOAD 

- Snel lader voor cassettesaven en -laden tot 4600 baud. 

☆ BACK-UP 

- Zet mcode programma’s, ook headerless, over van tape naar 
tape, tape naar disk of disk naar tape. Speciale aanpassingen voor 
het diskgebruik! 

☆ OLD 

- Hersteld een basic programma na een „new” of „reset”. 

☆ TAPEDIRECTORY 

- Overzicht van alle programma's op tape met naam, soort 
programma, basic, ascii of mcode met alle adressen. 

☆ DISKUTILITIES 

- Herkennen alle 8 MSX-disk en MS-Dos formaten; enkel- en 
dubbelzijdige disks op 3", 3.5" en 5.25" drives. 

☆ FILESRECOVERY 

- Zet gewiste programma’s weer op disk, automatisch na het 
intoetsen van de naam, Zonder gevaar voor andere files. 

☆ FILESDIRECTORY 

- Namen, lengte, datums, adressen en Ie sector van alle files. 

☆ FILES PER NAAM 

- Alle gegevens en sectorgebruik per programma op elk moment 
op te vragen via het submenu; datum, tijd, lengte, soort enz. 


Verkrijgbaar bij alle goede computerwinkels. 


* FILES SORTEREN 

- Alfabetisch op naam sorteren van alle programma’s en in een 
nieuwe directory weer naar disk schrijven. Keuze in sorteren. 

☆ DEFAULT DRIVE 

- Stelt naar keuze een andere defaultdrive in voor alle in- en 
uitvoer naar disk, zoals onder MSX-Dos. 

☆ VERIFYON 

- Controleert alle saven en laden naar en van disk. 

☆ CALL SYSTEM 

- Initieert MSC-Dos, ook als zonder Dos is opgestart, of voert het 
„autoexec.bas” programma van de disk uit. 

☆ DISK MONITOR 

- Leest alle sectoren van een disk uit, hexadecimaa! of in ascii 
naar keuze. Volgt een heel programma per sector. Geeft alle 
formateringsgegevens, de bootsector, de Fat, de directory en de 
datasectoren. Geeft ook de verborgen files op de disk en verandert 
de naam van de disk naar wens. 


Volledig menu gestuurde keuzes. Hardcopy- en old routine 
beschikbaar via de ESC- of Select-toets, ook bij uw eigen 
programma's, MSX-DOS en in combinatie met andere 
cartridges. 

Turbo 5000: het gemak in een doosje voor MSX 1 en 2. 


A.o.v. Verkoopprijs: 
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ze routine kunnen we wel op ieder 
veld van de array loslaten. 

Met hulp van de serie vaste subrou- 
tines bepalen we de keuze-voor de 
veldnaam. Alle namen worden geprint 
op het scherm (regel 7010 - 7090). 
Daar zien we, dat eerst de kop met de 
bewerking wordt geprint op het 
scherm (sub 500), waarna in de lus II 
alle 6 veldnamen (VN$()) in beeld ko¬ 
men. We gebruiken vervolgens sub- 
routine 800 v.v. om de ingetypte keu¬ 
ze te verwerken. De keuze, variabele 
KK wordt getest op z’n geldigheid, 
waarna de veldnaam-variabele (VL) 
de waarde krijgt van KK-1. Waarom 
deze waarde 1 lager ligt dan KK moet 
je zelf maar eens proberen uit te 
zoeken. 

We zijn inmiddels toe aan het vol¬ 
gende gedeelte van de zoekroutine: 

7110 VLAG=0 

7120 GOSUB 500 : REM kopprint 
7130 PRINT :PRINT:PRINT 
7140 PRINT "zoeken op 
VN$(VL);" 

7150 INPUT Z$ 

7160 FOR I = 1 TO TT : REM loop 
alle records 

7170 IF LEFT$(A$(I,VL),LEN(Z$)) = 
Z$ THEN GOSUB 721 0:IF 
SU=99 THEN I = TT 
7180 NEXTI 

Dit gedeelte houdt zich bezig met het 
echte scannen van het gehele be¬ 
stand. Eerst wordt nogmaals een 
(nieuwe) kop geprint, waarna in regel 
7150 de invoer van de op te zoeken 
string in variabele Z$ wordt gezet. 

In de lus I, die loopt van adres 1 tot 
adres TT, - het totaalaantal- wordt ver¬ 
volgens op veld VL in de array 
A$(I,VL) bekeken of Z$ overeen komt 
met hetzelfde deel in dat veld. Deze 
test staat in het eerste gedeelte van 
regel 7170. Deze regel bevat dan ook 
de kern van de hele zoekroutine. We 
testen alleen dat gedeelte van de 
string dat even lang is als Z$. Dit ge¬ 
beurt door het gebruiken van de func¬ 
tie LEFT$(). Op deze manier is het 
ook mogelijk alle namen die bijvoor¬ 
beeld beginnen met een "S" op te zoe¬ 
ken. De lengte van Z$ -LEN(Z$)- is 
dan natuurlijk 1, waardoor ook van al¬ 
le te testen namen in A$(I,VL) via 
LEFT$() alleen het eerste karakter 
wordt bekeken. Dit gaat niet alleen 
sneller, maar is ook handiger, omdat 
we op deze manier ook namen en an¬ 
dere gegevens waarbij we niet hele¬ 
maal zeker zijn van spelling en derge¬ 
lijke gemakkelijk uit het bestand kun¬ 
nen filteren. Wordt er inderdaad een 
goede string gevonden in array 
A$(I,VL) dan wordt subroutine 7210 

v.v. uitgevoerd. Over de variabele SU 


zullen we het later nog hebben. In ie¬ 
der geval wordt aan het eind van regel 
7170 de lus beëindigd door de waarde 
van I gelijk te stellen aan TT, als 
SU=99. Daardoor wordt in regel 7180 
niet opnieuw via NEXT teruggespron¬ 
gen naar het begin van de lus. In alle 
andere gevallen wordt deze routine 
afgesloten met een NEXT tot I de 
waarde TT heeft bereikt en het gehele 
bestand is afgezocht. 


Vlaggen 

Als laatste opmerking bij deze 
programmaregels wil ik nog wijzen op 
de variabele VLAG in regel 7110. 
Deze wordt elke keer dat de zoek¬ 
routine wordt aangeroepen op 0 
gezet. Aan de hand van de vlag- 
waarde zullen we verder op bekijken 
of we al dan niet een ’match’ hebben 
gevonden tussen Z$ en de inhoud van 
een of meer indexen in ons adressen¬ 
bestand. Daarvoor hebben we regel 
7190: 

7190 IF VLAG = 0 THEN 7380 
7200 RETURN 

Als vlag nog steeds de waarde 0 
heeft, wordt in regel 7190 een aparte 
subroutine aangeroepen, die zit op 
7380. Deze routine meldt op het 
scherm, dat er geen enkel veld is 
ontdekt in het bestand, waarin de gev¬ 
raagde string Z$ voorkomt. Het is 
uiteraard een goede gewoonte om dit 
soort fouten apart aan de gebruiker 
door te geven. Vandaar routine 7380 - 
7420: 

7380 REM record niet aanwezig 
7390 PRINT Z$ " niet gevonden" 
7400 PRINT "Typ toets voor 
vervolg" 

7410 GOSUB 800 
7420 RETURN 

Veel is er niet te zeggen van deze 
schermmelding, waarbij keurig wordt 
gewacht tot de gebruiker een toets 
heeft ingedrukt om aan te geven, dat 
hij de melding tot zich heeft genomen. 


Match 

Veel interessanter dan het voorgaan¬ 
de is het programmagedeelte wat 
wordt uitgevoerd, als Z$ matcht met 
een gedeelte van een veld. De aan¬ 
roep voor deze subroutine vinden we 
in regel 7170: 

7210 REM record gevonden - print 
op scherm 
7220 GOSUB 500 
7230 VLAG =1 

7240 PRINT "Record nummer: ";l 


7250 FOR II = 0 TO 5 
7260 PRINT VN$(II)" : ”A$(I,II) 
7270 NEXT II : PRINT 

Na de kop vinden we hier het nut van 
variabele VLAG. Zodra er een match 
optreedt, wordt naar deze routine ge¬ 
sprongen en wordt variabele VLAG 1. 
Daardoor is het mogelijk de test op het 
al of niet vinden van een goede string 
aan de hand van de waarde van 
VLAG te bepalen. Vervolgens wordt in 
lus II zowel de veldnamen als de ge¬ 
gevens in array A$() op het scherm 
geprint. Merk hierbij op, dat de index 
van het complete gevonden record 
wordt bewaard in lusvariabele I, die 
we hebben gegenereerd in regel 
7160. Het is belangrijk dit te on¬ 
thouden voor een paar andere 
modules in ons programma, die ook 
gebruik maken van deze zoekmodule. 

De module-vlag SU 

In onze subroutine gaan we verder 
vanaf regel 7280 met variabele SU. 
Deze SU heeft in ons geval drie 
mogelijke waarden: 0,1 of 2: 

7280 ON SU+1 GOTO 7300,7340, 
7340 : REM SU=SOORT 
MODULE 

7290 REM SU=0 normaal zoeken 
7300 PRINT "Typ toets voor 
vervolg" 

7310 GOSUB 800 
7320 GOTO 7370 

7330 REM SU=1 Verwijderen SU=2 
Muteren 

7340 PRINT "Dit record bewerken 
(J/N)" 

7350 GOSUB 850 
7360 IF T$="J" OR T$="j" THEN 
SU=99 

7370 RETURN 

We kunnen SU ook beschouwen ais 
een soort ’flag’, die door zijn waarde 
aangeeft waar we precies mee bezig 
zijn. Op die manier kunnen we van 
eenzelfde subroutine op meerdere 
wijzen gebruik maken. Heeft SU de 
waarde 0, dan betekent dit, dat we 
bezig zijn met een kale zoekactie, die 
vanuit het hoofdmenu wordt aanges¬ 
tuurd. In regel 1010 vinden we dan 
ook de opdracht (LET) SU=0. De 
waarde van SU wordt daar iedere 
keer dat we bij het hoofdmenu terecht 
komen op 0 gezet. Als SU een waarde 
heeft van 1, betekent dit, dat we de 
zoekroutine aanroepen vanuit de rou¬ 
tine om een record te verwijderen. We 
komen daar straks wel op terug. Ook 
voor het muteren (wijzigen) van een 
adresrecord, moeten we eerst zoeken 
naar het bewuste record in de array. 
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Omdat we slimmer dezelfde routine 
voor het zoeken kunnen gebruiken, 
die toch al aanwezig is in het program¬ 
ma, geven we dit aan, door in de mu- 
tatie-routine SU de waarde 2 toe te 
kennen. Tot slot krijgt SU nog een 
speciale waarde, namelijk 99 (erg 
symbolisch) als er specifieke dingen 
met een record gaan gebeuren. De 
test op SU voeren we uit in regel 7280, 
met een ON ..GOTO opdracht. Omdat 
SU ook de waarde nul kan hebben, 
moeten we er eerst 1 bij tellen, om dit 
commando goed te laten 
functioneren. Het is uiteraard 
helemaal niet nodig, om in ons geval 
met een ON..GOTO te werken, maar 
wel beter voor de structuur en zeker te 
verkiezen als we nog meer waarden 
aan de SU vlag willen toekennen. 

Als SU=0, dan kunnen we volstaan 
met een opdracht om een toets in te 
typen, als het gevonden record, wat 
op het scherm staat, door de 
gebruiker is bekeken. De routine gaat 
via sub 800 vv. door naar de zoeklus, 
om naar nog meer eventuele gelijke 
string te zoeken. 

Is SU 1 of 2, dan moet er iets anders 
gebeuren. We moeten nu namelijk 
weten, of er met het specifiek gevon¬ 
den record iets moet gebeuren, of dat 
er verder moet worden gezocht, naar 
een andere 'match’ in het bestand. 
Aan de hand van een eenvoudige JA/- 
NEE vraag (regel 7340) bepalen we of 
het gevonden record het juiste adres 
bevat. Is dit zo (regel 7360) dan geven 
we SU de waarde 99 om dat aan te 
geven. Is het tegendeel waar, dan 
houdt SU z’n oorspronkelijke waarde 
en keren we ook terug naar de zoek- 
routine. Heeft SU de waarde 99 dan 
zien we bij terugkeer in de echte zoek- 
routine, dat aan de hand van SU=99 
de lus en de routine beëindigd wordt, 
om terug te gaan naar de module die 
het zoeken heeft geactiveerd. 

Subroutines 

Het is verstandig deze zoekroutine in 
z’n geheel eens grondig te bekijken, 
omdat er nogal wat handigheidjes in 
zitten verstopt, die we in eerdere less¬ 
en al uitvoerig hebben bekeken, maar 
wellicht in het normale programma- 
gebruik niet mer zo opvallen. Let maar 
een op hoevaak we nu al bepaalde 
kleine vaste subroutines hebben 
aangeroepen, en met welk doel dit is 
gebeurd. Je zult verbaasd zijn over de 
diverse mogelijkheden die verscholen 
zitten in een paar regels programma. 
Het is daarbij helaas niet zo, dat je 
kunt leren programmeren, door 
steeds maar listings van anderen 
klakkeloos over te nemen. Dan kun je 
zelfs beter meteen naar de winkel 


gaan om er een echt goed pakket voor 
je toepassingen te kopen. Wil je zelf 
aan de slag, dan moet je niet alleen 
een goede analyse uitvoeren op be¬ 
staande listings, zoals deze, maar 
daarnaast ook helemaal zelf aan het 
schrijven. Ervaring is in dit geval de 
beste leermeester. Ook van eigen (en 
andermans) fouten valt een heleboel 
te leren. 


Muteren II 

We hebben nu de complete listing van 
de zoekroutine achter ons. Daar zijn 
we eigenlijk op gekomen, omdat we 
ontdekten, dat, voordat er ook maar 
een record kan worden gewijzigd, dit 
eerst in het bestand moet worden op¬ 
gezocht. In de zoekroutine hebben we 
aan de eerste twee bewerkingen tij¬ 
dens het muteren voldaan, zoeken & 
printen. We zullen daarom de feitelijke 
mutatie-routine eens bekijken: 

2999 REM Muteren / Wijzigen 

3000 GOSUB 500: REM kopprint 

3005 SU=2: GOSUB 7010 :IF SU = 

2 THEN RETURN 

We zien in de eerste regels, dat SU 
hier inderdaad de waarde 2 krijgt. Bo¬ 
vendien printen we een eigen kop, 
met hulp van subroutine 500. Vervol¬ 
gens gaan we naar de zoekroutine, 
door het aanroepen van GOSUB 
7010. Als SU terug komt met een 
waarde 2, dan betekent dit, dat we tij¬ 
dens het zoeken geen record hebben 
gevonden, wat we willen wijzigen. 
Daarom kunnen we zonder 
problemen terug naar het hoofdmenu 
meteen RETURN-opdracht. Heeft SU 
een andere waarde dan 2, in ons 
geval dat symbolische 99, dan gaan 
we verder met het wijzigen van het 
hele record: 

3010 GOSUB 500: REM KOPPRINT 

3011 FOR II = 0 TO 5 

3012 PRINT VN$(II);": ";A$(I,II) 

3014 NEXTII 

3020 PRINT:PRINT "Wijzigen 
zeker (J/N)" 

3030 GOSUB 850: IF T$= "N" OR 
T$="n" THEN RETURN 

In bovenstaand gedeelte wordt (op¬ 
nieuw) het hele record op het scherm 
gezet, waarbij we ter controle de 
vraag stellen of dit het juiste record is. 
Geven we hier een ontkennend ant¬ 
woord, dan wordt ook terug gespron¬ 
gen naar het hoofdmenu en gebeurt 
er niets met de data in het record. 

In alle andere gevallen gaan we over 
tot het daadwerkelijk wijzigen van alle 
velden. Dit gebeurt, door voor alle vel¬ 
den nieuwe gegevens in te toetsen: 


3040 PRINT CHR$(19): GOSUB 
520: REM PRINT HOME 
3050 FOR II = 0 TO 5 
3060 PRINT VN$(II);": 

3070 INPUT HA$(II) 

3080 NEXT II 

3090 PRINT : PRINT "Korrekt 
ingevoerd (J/N)"; 

3100 GOSUB 850 
3110 IF T$="n" OR T$ = "N" THEN 
3000 

Ook na de invoer moet men ook weer 
een controle op de juistheid van de 
gegevens uitvoeren, waarna we over- 
eenkomtig het antwoord ofwel op¬ 
nieuw aan de invoer beginnen, ofwel 
het gewijzigde record in ons adres¬ 
senbestand opnemen: 

3120 AA=I : GOSUB 300 : REM 
wegzetten in array 
3130 PRINT:PRINT "Meer records 
wijzigen (J/N)"; 

3140 GOSUB 850 
3150 IF T$="n" OR T$ = "N" THEN 
RETURN 

3160 GOTO 3000 

Al met al een niet erg moeilijk te begrij¬ 
pen routine. Als je deze vergelijkt met 
de regels tussen 2000 en 300, waar 
een record wordt toegevoegd aan het 
bestand zul je weinig verschillen te¬ 
gen komen. Het enige echte verschil 
zit in de indexvariabele van array A$(). 
bij het toevoegen hebben we daar 
steeds de hoogste waarde, terwijl in 
dit geval de indexwaarde van de zoek¬ 
lus (I) wordt gebruikt, om het juiste 
record te bepalen en bewerken. Daar¬ 
om is met name regel 3120 sterk 
verschillend van regel 2120, hoewel 
dezelfde subroutine (300) wordt 
gebruikt. Bekijk deze module rustig 
en, wat meer is, probeer hem uit op je 
eigen computer. 

Tot slot. 

Hiermee hebben we weer twee leuke 
modules aan ons programma 
toegevoegd. We kunnen nu niet al¬ 
leen adressen toevoegen aan het be¬ 
stand, maar ook zoeken in alle 
mogelijke velden, terwijl we als laatste 
ook wijzigingen in de bestaande 
adresrecords kunnen aanbrengen. 
Het geheel begint daardoor ook 
steeds meer op een volwassen 
programma te lijken. Voor de vol¬ 
ledigheid zullen we de volgende keer 
het complete programma tot op dit 
moment in z’n geheel nog eens 
afdrukken. 

Jan Bodzinga 
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De spectaculaire beeld-, geluids-en typografische 
manipulaties die mogelijk zijn met de Amiga 500 doen de 
prestaties van de concurrentie letterlijk verbleken. Je krijgt 
een palet van maar liefst 4096 kleuren tot je beschikking, 
geluidseffecten kunnen voortaan in vierkanaals stereo, en 
lettertypen zijn er nu in alle maten en grootte. 

De Amiga 500 biedt nog meer nieuws: Multitas- 
king. Alle mogelijkheden die de Amiga 500 in zich heeft, 
kun je ook gelijktijdig gebruiken. Dus nu ook: animaties 
met geluidseffecten en aftiteling, om een voorbeeld te 
noemen. En of het nog niet genoeg is, er is voor de Amiga 
500 ook een MS-Dos emulator beschikbaar voor het 
draaien van PC-programma's. 

Verder aansluitingsmogelijkheden te over en alle¬ 
maal volledig conform de industriestandaard, zodat alle 
interacties met video- en audioapparatuur probleemloos 
verlopen. Voor de Amiga 500 is er inmiddels een ruime 
keus aan software. En als je zelf wilt programmeren, dan 
manipuleert niets makkelijker dan de Amiga-muis. 

De Nederlandse handleiding en de Stap-voor-Stap 
diskette helpen je spelenderwijs op weg. 


BELANGRIJKSTE TECHNISCHE SPECIFICATIES 

Motorola 68000 32/16 Bit 
7.14 MHZ 

512KRAM, 256 KROM 
RAM-geheugen iotero uitbreidbaar tot 
1 Mb. met klok/kalender. Extern uit¬ 
breidbaar tot 8.5 Mb. 

Ingebouwde 3'/2 inch dubbelzijdige drive. 
Capaciteit 880 Kb, geformatteerd. 

1081 of 1084 
640 x 512 beeldpunten 
4096 kleuren 
4 kanaals stereo 

Centronics, serieel en A/D convertor 
optioneel: Midi, Gen-Lock en T.V. 
modulator. 


at\\mer en 


Monitor 

Schermresolutie 

Kleurenpalet 

Audio-uitgang 

Interfaces 


lfec honwieïpen 


JE MAAKT EN MIXT HET 
MET DE AMIGA. 




Commodore 


JE WILT MEER, 
DUS JE KRIJGT MEER. 
















De onderstaande machinetaal-routine is een uitbreiding van de spritebotsingsroutine die al in MSX- 
basic te vinden is, nl. het ON SPRITE GOSUB statement. 


SPRITE-DETECTOR 


W as het met dat statement alleen maar mogelijk om te controleren of twee 
sprites elkaar raken, mijn routine gaat nog een stapje verder door ook 
te vertellen WELKE sprites elkaar raken. Bovendien kan het gebied waarin 
een sprite als ‘geraakt’ beschouwd wordt naar believen ingesteld worden, 
zodat het bijvoorbeeld mogelijk is om twee sprites een stukje in elkaar te la¬ 
ten gaan voordat ze als ‘gebotst’ beschouwd worden (bijv. bij PACMAN). 


In de listing staat de uitleg van de rou¬ 
tine, alsmede een demo-programma 
om het gebruik ervan te tonen. 

In een eigen programma hoeven al¬ 
leen de regels 10000-10350 en 21000- 
21060 overgenomen te worden. 

Een korte uitleg van het gebruik van 
de routine (welke ook in de listing zelf 
staat): 

De routine staat in het bereik van 
&HefDD-&Hef64, zodat de eerste re¬ 
gel van een programma moet luiden: 

10 CLEAR &HEEFF 

Om de data’s in te lezen gebruikt men 
dan : 

20 GOSUB 10000 

De subroutine vanaf 21000 gaat er 
van uit dat er 1 sprite gegeven wordt, 
waarvan dan gekeken wordt of deze 
een andere sprite binnen een bepaal¬ 
de MARGE raakt, en zo ja welke. 

De gegeven sprite moet in de varia¬ 
bele SN staan en de marge in MA. 
Vervolgens GOSUB 21DDD en voila, 
bijna onmiddelijk keert het program¬ 
ma terug uit de subroutine en bevat 
BN het nummer van de sprite waar¬ 
mee de botsing plaats vond of, in ge¬ 
val van geen botsing, de waarde 255. 


Voorbeeld: 

230 SN=3:MA=8:G0SUB 21000 
240 IF SN=10 THEN ... ELSE ... 


Tevens wordt de machinetaal-listing 320 
afgedrukt, zodat de machinetaal-fa- 
naten de routine kunnen bestuderen, 
verbeteren en uitbreiden naar eigen 330 
believen. 340 

9997 

9998 

Basic Listing SpriteDetector 9999 

10000 

10 CLEAR 200,&HEEFF 10010 

20 GOSUB 10000 10020 

30 ’ 10030 

40 ’ regel 10 en 20 MOETEN 10040 

50 ’ het begin van uw 10050 

60 ’ programma zijn. 10060 

70 ’ 10070 

80 ’DEMO 10080 

90 ’ 10090 

100 ONSPRITEG0SUB300: 10100 

SPRITE ON 10110 

110 COLOR 1,15,15:SCREEN 1,1 10120 

120 SPRITE$(0)=STRING$ 10130 

(32,CHR$(255)) 10140 

130 DIM X%(5),Y%(5),RX%(5), 10150 

RY% (5) 10160 

140 F0R G=1 TO 5 10170 

150 X%(G)=INT(RND(1)*200)+20 10180 

160 Y%(G)=INT(RND(1)*190)+1 10190 

170 RX%(G)=INT(RND(1)*2 )+1 10200 

180 RY%(G)=INT(RND(1)*2 )+1 10210 

190 NEXTG 10220 

200 10230 

210 CLS 10240 

220 F0R G=1 TO 5 10250 

230 PUT SPRITEG,(X%(G),Y%(G)), 10260 

G*2,0 10270 

240 X%(G)=X%(G)+RX%(G) 10280 

250 Y%(G)=Y%(G)+RY%(G): IFY% 10290 

(G)190THENY%(G)=0 10300 

260 NEXTG 10310 

270 GOTO 220 10320 

280 : 10330 

300 SPRITE OFF:FOR H=l TO 5 10340 

310 SN=H:MA=17:GOSUB 21000 10350 


IF SN<255 THEN Y%(SN)=0: 
BEEP:PUT SPRITE 
SN,(X%(SN),Y%(SN)),0 
NEXT H:SPRITE ON:RETURN 


FOR G=&HEF00 TO &HEF64 
READ H$ 

POKE G,VAL("&H"+H$) 
NEXTG 

F1=&HF005 

F2=&HF006 

DEF USR=&HEF00 
RETURN 

DATA 3A,05,F0,CB 
DATA 27,CB,27,5F 
DATA 16,00,21,00 
DATA 1B,19,CD,4A 
DATA 00,4F,23,CD 
DATA 4A,00,47,3E 
DATA 00,32,06, F0 
DATA 21,00,1 B,3A 
DATA 06,FO,57,3A 
DATA 05,F0,BA,CA 
DATA 47,EF,CD,4A 
DATA 00,91,DC,5A 
DATA EF,FE, 8,DA 
DATA 39,EF,C3,47 
DATA EF,23,CD,4A 
DATA 00,2B,90,DC 
DATA 5A,EF,FE, 8 
DATA DA,5E.EF,3A 
DATA 06,F0,3C,32 
DATA 06,F0,FE,20 
DATA CA,5F,EF,23 
DATA 23,23,23,C3 
DATA 1F,EF,57,3E 
DATA 00,92,C9,3E 
DATA FF,32,06, F0 
DATA C9 
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20000 ’ 

20010 ’ DEZE SUBROUTINE KAN 
20020 ’ GEBRUIKT WORDEN BIJ 
20030 ’ HET ONDERZOEKEN VAN 
20040 BOTSINGEN. 

20050 ’ 

20060 ’ ALVORENS DE ROUTINE 
20070 ’ AAN TE ROEPEN, MOE- 
20080 ’ TEN DE VOLGENDE VA- 
20090 ’ RIABELEN INGESTELD 
20100 'WORDEN: 

20110 ’ 

20120 ’ SN= spritenummer van de 
20130 ’ sprite die gecontro- 
20140 ’ leerd moet worden. 

20150 ’ 

20160 ’ MA= marge waarin gezocht 
20170 ’ moet worden, (dwz de 
20180 ’ horizontale en verti- 
20190 ’ cale afstand waarin 
20200 ’ een sprite zich moet 
20210 ’ bevinden om als 
20220 ’ 'gebotst' ontdekt te 
20230 ’ worden. 

20240 ’ 

20250 ’ bij 8*8 sprites is de 


20260 ’ beste marge 5 of 6. 
20270 ’ 

20280 ’ bij 16*16 is deze 10 

20290 ’ tot 14 

20300 ’ 

20310 ’ bij terugkeer uit deze 
20320 ’ subroutine zal SN het 
20330 ’ nummer van de sprite be- 
20340 ’ vatten die zich binnen 
20350 ’ de vastgestelde marge 
20360 ’ bevindt. 

20370 ’ 

20380 ’ Als er meerdere sprites 
20390 ’ binnen de marge zitten, 
20400 ’ dan zal SN de sprite met 
20410 ’ het laagste spritenummer 
20420 ’ bevatten. 

20430 ’ 

20440 ’ indien geen enkele sprite 
20450 ’ zich binnen de marge be- 
20460 ’ vindt, wordt SN gelijk 
20470 'aan 255. 

20480 ’ 

20490 ’ ROEP DEZE ROUTINE AAN 
MET: 

20500 ’ 


20510 ’ 

20520 ’ G0SUB 21000 
20530 ’ 

20540 ’ 

20550 ’ 

20560 > ************************** 

20570 '* 

20580 ’* (C) 1986 

20590 ’* 

20600 ’ * MARCEL KREEFT * 
20610 ’ * HOOGSTRAAT 110* 
20620 ’ * 5061 EZ * 

20630 ’ * OISTERWIJK 
20640 ’* 

20650 > ************************** 

20660 ’ 

20670 ’ 

20680 ’ 

21000 P0KE F1,SN 
21005 IF MA=0 THEN MA=8 
21010 P0KE &HEF32,MA 
21030 POKE &HEF43.MA 
21040 DUMMY=USR(0) 

21050 SN=PEEK(F2) 

21060 RETURN 


Machinetaallisting Sprite-detector 


0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 


** SPRITE COLLISION **** 

* 

(C) 1986 BY: 

* 

* MARCEL KREEFT 

* * 

********************************* 


EF2E 

EF31 

EF33 

EF36 

EF39 

EF39 

EF3A 

EF3D 

EF3E 

EF3F 

EF42 


DC5AEF 

FE08 

DA39EF 

C347EF 

23 

CD4A00 

2B 

90 

DC5AEF 

FE08 


XPOS 


CALL 

CP 

JP 

JP 

INC 
CALL 
DEC 
SUB 
CALL 
CP 


C,CHANGE 

8 

C,XP0S 

NEXT 

HL 

RVRAM 

HL 

B 

C,CHANGE 


EF00 



ORG 

$EF00 

EF44 

DA5EEF 


JP 

C,FOUND 

EFOO 


FLAG1 

EQU 

$F005 

EF47 


NEXT 



EFOO 


FLAG2 

EQU 

$F006 

EF47 

3A06F0 

LD 

A,(FLAG2) 

EFOO 


RVRAM 

EQU 

$4A 

EF4A 

3C 


INC 

A 

EFOO 


J 



EF4B 

3206F0 


LD 

(FLAG2),A 

EFOO 

3A05F0 


LD 

A,(FLAG1) 

EF4E 

FE20 


CP 

$20 

EF03 

CB27 


SLA 

A 

EF50 

CA5FEF 


JP 

Z,END 

EF05 

CB27 


SLA 

A 

EF53 

23 


INC 

HL 

EF07 

5F 


LD 

E,A 

EF54 

23 


INC 

HL 

EF08 

1600 


LD 

D,0 

EF55 

23 


INC 

HL 

EFOA 

21001B 


LD 

HL,$IB00 

EF56 

23 


INC 

HL 

EFOD 

19 


ADD 

HL,DE 

EF57 

C31FEF 


JP 

YPOS 

EFOE 

CD4A00 


CALL 

RVRAM 

EF5A 


CHANGE 



EF11 

4F 


LD 

C,A 

EF5A 

57 

LD 

D,A 

EF12 

23 


INC 

HL 

EF5B 

3E00 


LD 

A,0 

EF13 

CD4A00 


CALL 

RVRAM 

EF5D 

92 


SUB 

D 

EF16 

47 


LD 

B,A 

EF5E 

C9 

FOUND 

RET 


EF17 


• 



EF5F 


j 



EF17 

3E00 

INIT 

LD 

A,0 

EF5F 

3EFF 

END 

LD 

A,$FF 

EF19 

3206F0 


LD 

(FLAG2),A 

EF61 

3206F0 


LD 

(FLAG2),A 

EF1C 

21001B 


LD 

HL,$1 B00 

EF64 

C9 


RET 


EF1F 


• 








EF1F 

3A06F0 

YPOS 

LD 

A,(FLAG2) 

Symbol table: 




EF22 

57 


LD 

D,A 

CHANGE 

EF5A 

END 

EF5F 

EF23 

3A05F0 


LD 

A,(FLAG1) 

FLAG1 


F005 

FLAG2 

F006 

EF26 

BA 


CP 

D 

FOUND 

EF5E 

INIT 

EF17 

EF27 

CA47EF 


JP 

Z,NEXT 

NEXT 


EF47 

RVRAM 

004A 

EF2A 


J 



XPOS 


EF39 

YPOS 

EF1F 

EF2A 

CD4A00 


CALL 

RVRAM 






EF2D 

91 


SUB 

C 

Assembly complete no errors 
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BELASTINGAANGIFTE? 


Geen probleem 
met uw 

MSX-computer! 










Ook dit jaar levert KI uwer naast de belas- 
tinggids een programmacassette waarmee 
u het aangiftebiljet vlekkeloos invult. Alle 
basisgegevens, zoals tarieven, drempels, 
percentages, standaardregelingen e.d. zijn 
al in het programma opgenomen. 

De computer stelt vragen en aan de hand 
daarvan voert u uw persoonlijke gegevens 
in. 

Daarna geeft de computer exact aan wat 
u bij elk punt van het aangiftebiljet moet 
invullen. Het resultaat is een kant en klare 
aangifte. Bovendien weet u onmiddellijk 
wat u terug krijgt of bij moet betalen. Ook 
dat rekent de computer uit. 

NIEUW is het aparte programma onder¬ 
deel waarmee u zelf de hoogte van de 
toelage van de studiefinanciering kunt 
uitrekenen. 

NIEUW is ook de invoermogelijkheid in 
een apart programma voor de persoonlijke 


omstandigheden en de samenstelling van 
het belastbaar inkomen, waarna het pro¬ 
gramma de verschuldigde inkomstenbelas¬ 
ting en premieheffing volksverzekering be¬ 
paalt. 

Nu geschikt voor bijna elke huiscompu- 
ter! 

De programmacassette is geschikt voor de 
Commodore 64 en 128, Spectrum 48K en 
alle huiscomputers met een MSX-opera- 
ting system. 

Prijs 

De Kluwer programmacassette kost 
f24,90 (incl. BTW en verzendkosten). 

De gids kost f 20,50. Bij abonnement be¬ 
taalt u slechts f 17,50 en ontvangt u jaar¬ 
lijks automatisch de nieuwste editie tegen 
de speciale abonneeprijs. 

Bestellen 

Voor uw bestelling kunt u ons informatie¬ 
centrum Libresso bellen: 05700-33155 of 


Kluwer 

belastinggids 

. n . i .mui. . n itnlmin.. r • 

1QOO 

laOO 



onderstaande bestelstrook gebruiken. 

De cassette en de Kluwer belasting¬ 
gids: een ideale combinatie! 

N.B. Voor de Commodore en MSX ge¬ 
bruikers is rechtstreeks bij de uitgever 
een discette verkrijgbaar voor f 37,50 


a 



Uitgeverij Kluwer bv 


_J Postbus 23, 7400 GA Deventer 




BESTELSTROOK 


In open envelop, zonder postzegel, 
zenden aan: Uitgeverij Kluwer bv, 
Antwoordnummer 93. 7400 VB Deventer 


Ondergetekende wenst 

rechtstreeksVvia boekhandel**_ 

Programmacassette 1988 

... ex. Kluwer programmacassette a f 24,90 
(90A7285885) 

Kluwer belastinggids 

... abt. Kluwer belastinggids a f 17,50 

(728/9020011103) en ontvangt de editie 1988 en de nieuw te 
verschijnen edities automatisch en tegen de speciale abonnee- 
prijs. 

...ex. Kluwer belastinggids 1988 a f 20,50 
(9020011103) 


Naam:_ 

Straat:_ 

Postcode:_ 

Plaats:_ 

Factuur zenden aan: 


Datum:_ 

Handtekening: 


Genoemde prijzen zijn incl. BTW, incl. verzendkosten. 

Leyering, facturering en incassering: Libresso bv, Deventer. Leveringen en diensten volgens voorwaarden gedeponeerd bij de arrondissementsrechtbank te Zutphen 
onder nummer 129/80 d.d. 22 december 1980. ' K 

“Wenst u levering via de boekhandel, dan verzoeken wij u deze strook direct aan uw boekhandelaar te zenden. 

Prijswijzigingen voorbehouden. Ook verkrijgbaar bij boekhandel, computershop en warenhuis, 
december 1987. 













































Op basisscholen wordt steeds meer met computers gewerkt. Het hoeft hierbij niet alleen te gaan om 
lessen computergebruik, ook in andere lessen kan de computer toegepast worden. Hiervoor is na¬ 
tuurlijk wel de juiste software nodig.Lesmaker is een pakket waarmee de onderwijzer zelf lesp ro- 
gramma’s kan samenstellen. Rob Timmer bekeek het pakket en liet het door twee basisscholen in 
de praktijk gebruiken. 


LESMAKER 


School en programma-maker blijven bezig 
met de computer 

H et aanschaffen van één of meerdere computers voor het basis-onderwijs 
lijkt op het volgen van de voorspellingen van het weer. Systeem A lijkt 
het te gaan maken, en besluiten systeem B aan te schaffen is een ramp. 

Twee maanden later blijkt het omgekeerde de juiste beslissing te zijn. Hoe 
het weer ook zal zijn, een onvoorwaardelijke keuze voor één bepaald merk 
is absoluut verkeerd. Met deze behulpzame en opbeurende woorden zult u 
het moeten doen. 


Ondanks de turbulente ontwikkelin¬ 
gen op de computermarkt zijn er al 
honderden scholen gewoon begon¬ 
nen en hebben zich een computer van 
het één of andere merk aangeschaft. 
Gelukkig blijven de ontwikkelaars van 
zowel systeem A als B bezig om voor 
die apparaten onderwijs-program- 
ma’s te maken. Soms komt daar een 
goed programma voor uit. Over die 
betere programma’s willen wij het nu 
hebben. ‘Lesmaker’ van uitgeverij 
Stark-Texel hebben wij vier weken in 
huis gehad en grondig bekeken. De 
firma uit Oosterend houdt zich al 
sinds enige tijd bezig met onder ande¬ 
re programma’s voor het onderwijs, 
zowel voor MSX als binnenkort ook 
voor MS-DOS machines. Het bedrijf 
houdt zich naast het ontwerpen van 
software voor een groot deel bezig 
met het uigeven van computerboeken 
voor alle soorten computers. 

Uit het ‘veld’ 

Het leek ons verstandig om de beoor¬ 
deling van een onderwijs- programma 
mede door mensen uit ‘het veld’ te la¬ 
ten doen. In dit geval hebben wij twee 
basisscholen verzocht het program¬ 


ma te testen. Twee heel verschillende 
scholen, respectievelijk uit Krimpen¬ 
en Capelle aan den IJssel, hebben het 
programma Lesmaker een week be¬ 
keken. De tamelijk toevallige keuze 
voor deze twee scholen blijkt onmid- 
delijk een enthousiaste reactie bij de 
directeuren op te leveren. De Open¬ 
bare basisschool West uit Capelle 
aan den IJssel doet al vier jaar aan on¬ 
derricht in computerbekendheid. En¬ 
kele onderwijskrachten hebben een 
informatica-cursus gevolgd en bren¬ 
gen, samen met een groepje ouders, 
de kinderen wat toepassingsmogelijk¬ 
heden en de werking van de computer 
bij. Er wordt op deze school gebruik 
gemaakt van lesmateriaal van de 
stichting Input. De school werkt zowel 
met de al wat oudere P2000 als met 
een MSX2 computer. 


Aanvulling 

"Het pakket Lesmaker past aardig in 
de benadering die wij hanteren als het 
gaat om computers in het basisonder¬ 
wijs”, aldus Ton Semper, directeur 
van de OBS-West te Capelle aan den 
IJssel. “De computer zelf kan een 
aanvulling zijn op het lesgeven over 


maatschappelijke toepassingen voor 
dit apparaat. Naast de door ons ge¬ 
wenste bedieningseenvoud van de 
computer, mag het lesprogramma 
geen type-vaardigheid van de leerlin¬ 
gen verlangen." Lesmaker geeft de 
leerkracht de mogelijkheid om voor 
meerkeuze- antwoorden, de 
zogenaamde dedemultiple choice, of 
‘waar-niet waar’ antwoorden te kie¬ 
zen. Op die manier kan er met een 
druk op ’n knop antwoord worden ge¬ 
geven. Ook is het mogelijk te kiezen 
voor een beantwoording van vragen 
waarbij type-vaardigheid noodzakelijk 
is. 


Spelfouten 

In het programma Lesmaker dienen 
zowel de vragen als de antwoorden te 
worden ingegeven. Dit biedt aardige 
mogelijkheden voor het opzetten van 
een les. "Vooral de mogelijkheid om 
gemaakte spelfouten niet als een ver¬ 
keerd antwoord aan te merken, is op 
het basisonderwijs bijzonder welkom. 
Het moet dan uiteraard niet om een 
taallesje gaan", zegt Ton Semper. “Bij 
mijn weten is dit het eerste lespro¬ 
gramma dat met een spelfout- toleran- 
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tie kan werken." Toch wil Ton Semper 
van de OBS-West in Capelle nog wat 
algemene kanttekeningen bij dit pro¬ 
gramma maken. "Lesgeven is niet al¬ 
leen het opstellen van goede antwoor¬ 
den. Ondanks de aardige hulp-optie in 
dit programma, deel voor deel het 
goede antwoord tonen, kan er geen 
begrip omtrent de vraag worden ge¬ 
toetst. Het bieden van inzicht-geven- 
de hulp blijft een probleem bij lesge¬ 
ven via een computer", aldus het 
schoolhoofd. "Ook mag niet van elke 
leerkracht worden verwacht dat zij of 
hij in staat is een goed lesprogramma 
op te zetten." 


Public Domain 

Dit laatste heeft de uitgever van het 
programma ook ingezien.Het is de be¬ 
doeling gebruikers van Lesmaker aan 
te sporen lessen te maken en aan te 
bieden als zogenaamde public do¬ 
main software. Scholen die wel over 
het programma maar niet over ge¬ 
schikte ontwerpers van lessen 
beschikken kunnen, hetzij gratis hetzij 
tegen vergoeding, gebruik maken van 
door andere scholen gemaakte pro¬ 
gramma’s. De eventuele vergoeding 
komt bijna volledig toe aan de makers 
van een ijzersterk programma voor 
Lesmaker. 


Goede demo’s 

Ondanks de op beide scholen goed 
geachte Nederlandstalige handlei¬ 
ding, een 136 pagina’s dik boekje, en 
de verschillende demonstratiepro- 
gramma’s blijkt een week bekijken 
van dit programma wat aan de korte 
kant. "Er zal zeker een aantal weken 
nodig zijn om de meer ingewikkelde 
codes en instellingen van het pro¬ 
gramma onder de knie te krijgen", al¬ 
dus directeur Schuil van de basis¬ 
school De Schakel uit Krimpen. "De 
bijgeleverde memo- kaarten met een 
korte uitleg van codes en functies zijn 
een welkome hulp voor een maker 
van een les. De eerste stappen blijken 
nogal eenvoudig, maar naarmate men 
dieper op de mogelijkheden van dit 
programma ingaat wordt het tamelijk 
ingewikkeld en arbeidsintensief om 
een goed lesprogramma op te zetten", 
volgens de heer Schuil. Het is jammer 
dat eventueel in te voeren plaatjes op 
zo’n tijdrovende manier moeten wor¬ 
den gemaakt. Als dat eenvoudiger 
zou kunnen is het programma Lesma¬ 
ker helemaal af." 


Plaatjes maken 

Door de opzet van het programma, 
‘wat je ziet is wat je krijgt’, kunnen er 
ook plaatjes worden gemaakt. De gra¬ 
fische tekens van de MSX-computer 
maken het mogelijk afbeeldingen op 
te bouwen. Het is via een bepaalde 
selectie mogelijk deze tekens tot acht 
keer te vergroten, maar om op deze 
manier ‘tekeningetjes’ te maken is niet 
eenvoudig en tamelijk arbeidsinten¬ 
sief. 

Een uitstekende optie is het aan de 
leerling tussentijds verstrekken van 
extra informatie. Uitleg van moeilijke 



Computeronderwijs op school 


woorden via een op te roepen scherm 
of het kunnen raadplegen van tabellen 
geven dit programma grote mogelijk¬ 
heden. Het complete Lesmaker- pak¬ 
ket bestaat uit twee schijfjes. Een ont- 
werpdisk waarop de lessen worden 
aangemaakt en een uitvoerdisk waar¬ 
op de gemaakte lessen worden weg¬ 
geschreven. De behaalde resultaten 
van de leerling bij het beantwoorden 
van vragen kunen automatisch wor¬ 
den weergegeven. De ontwerper van 
een les kan zelf bepalen of die resul¬ 
taten voor de leerling zichtbaar zijn of 
niet. Het uitvoerdersschijfje kan in de 
benodigde aantallen worden bijbe¬ 
steld bij de uitgever van Lesmaker. 


Conclusie 

Lesmaker is door ons niet als een ui¬ 
terst eenvoudig programma ervaren. 
Toch geven de duidelijke handleiding 
en de aardige voorbeeldprogramma’s 
een goed inzicht in de toepassings¬ 
mogelijkheden van dit programma. 
Het is, voor een nuttig gebruik van het 
programma, noodzakelijk zowel enige 
computerervaring als ervaring in het 
samenstellen van lessen voor het on¬ 
derwijs te hebben. Dat laatste is door 
de twee scholen die het programma 


een week hebben bekeken van het 
nodige commentaar voorzien. 

Voor meer informatie (bijvoorbeeld 
over de MS-DOS versie of over gro¬ 
tere aantallen) kan de geïnteresseer¬ 
de contact opnemen met de uitgever 
van het programma. Uitgeverij Stark- 
Texel te Oosterend, telefoon 02223- 
661. 

Lesmaker voor MSX en MSX-2, prijs 
ƒ 495,- incl. BTW 


Vier jaar INPUT 

Informaticaproject voor basisscholen 
In 1983 is het allemaal begonnen, op 
initiatief van de Nederlandse spaar¬ 
banken en met medewerking van de 
Onderwijs Groep Philips Computers 
(OWG) startte een proefproject van 
enkele maanden op honderden scho¬ 
len verspreid door het hele land. 
Thans zijn de lessen en computers 
van INPUT iedere dag in gebruik op 
meer dan duizend scholen in Neder¬ 
land. 

Het nu vier jaar oude project richt zich 
op leerlingen van de twee hoogste 
groepen van het basisonderwijs, een 
compleet pakket wordt aan de scho¬ 
len aangeboden, bestaande uit een 
computer met diskdrive, een monitor, 
lesboekjes voor de leerlingen en een 
handleiding voor de leerkracht. Het 
pakket zal door de school aange¬ 
schaft moeten worden, waarna de be¬ 
geleiding door INPUT wordt verzorgd. 
Oefenprogramma’s, aanvullend les¬ 
materiaal en ondersteuning komen 
van project INPUT. Vooral de onder¬ 
steuning blijkt door veel scholen op 
prijs te worden gesteld. Via een con¬ 
tactpersoon blijft de school verbonden 
met de uitgever van het pakket. De sa¬ 
menstelling van de lessen en oefenin¬ 
gen staat mede onder toezicht van het 
Regionaal Steunpunt voor Onderwijs 
en Informatie-technologie (RSOI) uit 
Amersfoort. 

Doel van het INPUT project is de leer¬ 
lingen op eenvoudige wijze kennis te 
laten maken met de computer, het 
toetsenbord en de monitor. Na twaalf 
oefenlessen krijgt de leerling een cer- 
tificaaat, en mag van hem of haar wor¬ 
den verwacht niet meer vreemd tegen 
een computer aan te kijken als zo’n 
apparaat in het vervolgonderwijs of la¬ 
ter opduikt. 

Als het schoolteam iets verder wil 
gaan kan de leerlingen, met behulp 
van het boekje ‘Beetje Basic’, de be¬ 
ginselen van het programmeren in Ba¬ 
sic worden bijgebracht. 

Rob Timmer 
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Bij veel lezers zal er de wens bestaan om machine taal programma’s van tape naar disk te zetten. 
Alleen al om van die lange cassette laadtijden af te zijn. Daar komt nog bij dat een disk-drive bezit¬ 
ter z’n drive gebruiken wil en dus niet teveel de cassette gebruikt als opslag medium. Een ma¬ 
chinetaal routine, MCSPLIT als hulpmiddel voor MSX-I, 64 KB computers. Een artikel van Wim van 
der Kuilen. 


MCSPLIT 


Van cassette naar diskdrive 


W ie een diskdrive bezit, loopt toch nog wel eens op tegen zijn oude cas- 
sette-erfenis. Er staan op de oude cassettes misschien nog wat leuke 
programma’s, die eigenlijk toch wel aardig waren. Maar hoe komen die van 
de cassette op de schijf. Machinetaal programma’s en/of blokken van cas¬ 
sette naar disk zetten gaat niet altijd even gemakkelijk. 


Zeg maar gerust dat dit vaak problemen opievert. Die ont¬ 
staan vooral omdat de diverse machinetaal blokken de 
disk-ruimte in het geheugen overschrijven. De disk-drive 
wordt dan geblokkeerd en meestal ‘crashed’ de computer 
en/of reset zich. Dit artikel helpt u dit probleem in de mees¬ 
te gevallen te omzeilen. 

Bij het gebruik van een drive is het vrij beschikbare RAM- 
geheugen onder Basic beperkt van adres 8000 hex. tot on¬ 
geveer El 00 hex. De ruimte van El 00 hex. tot F380 hex. 
wordt namelijk gereserveerd voor 2 disk buffers en hun va¬ 
riabelen, nl. voor drive A en B. 

Het is mogelijk om een drive af te koppelen door tijdens het 
opstarten de ’CTRL’ toets ingedrukt te houden. Er is dan 
wel wat meer vrij geheugen ter beschikking tot ca. E300 
hex., echter nog steeds niet genoeg om machinetaal blok¬ 
ken te laden welke bv. 8595 h als beginadres hebben en 
eindigen bij bv. EF00 h. 

Het laden van zo’n groot blok onder Disk-basic resulteert 
altijd tot het vastlopen van de computer ofwel een reset. 
Willen we zo’n blok naar disk schrijven en later weer van 
disk kunnen laden, moeten we een speciale werkwijze toe¬ 
passen. Stap voor stap zullen we hier een methode bespre¬ 
ken die in de meeste gevallen werkt. 

Om te beginnen, moeten we eerst het volgende doen : 

1. Bepaal start, eind en executie adressen van het blok ma¬ 
chinetaal dat we willen overzetten van cassette naar disk. 
Gebruik hiervoor bv. het programma Tapedir of een ande¬ 
re utility. 

2. Start de computer op zonder Disk-Basic houdt SHIFT + 
CTRL' ingedrukt. 

3. Laadt machinetaal blok in vanaf cassette als het blok ge¬ 
laden is, stop dan een andere, lege cassette in de data re¬ 
corder. 


4. Vervolgens gaan we het zojuist geladen blok weer naar 
cassette schrijven,maar nu gesplitst in 2 delen, bijvoor¬ 
beeld als volgt; 

5. Stel dat het geladen blok begint op adres 8598 en ein¬ 
digt op EF00 h. en het executie-adres is 8598 hex. 

We gaan nu het eerste deel van dat blok naar cassette, 
schrijven, van bijvoorbeeld 8598 hex. tot C4FF hex. met het 
commando: 

’ BSAVE "CAS:DEEL-1 ",&H8598,&HC4FF ’ 


EF00 


C500 C4FF 8598 

-r a W fT --|- 


TOTALE PROGRAMMA ELOK 
DEEL-2 —>U DEEL 


'1 


Figuur 1 


6. Het 2e deel wordt op dezelfde wijze naar cassette ge¬ 
schreven. Dit 2e deel bevindt zich op adres C500 hex. tot. 
en met EF00 hex., dus: 

’ BSAVE "CAS:DEEL-2",&HC500,&HFF00 

7. Als dit alles klaar is, de tape terugspoelen en de compu¬ 
ter met reset of uit/aan opstarten maar nu met Disk-Basic. 
Tot zover de eerste handelingen die noodzakelijk zijn om 
te beginnen (zie figuur 1). 

Wat weten we nu van de twee delen welke we net op cas¬ 
sette gezet hebben? Ten eerste het executie-adres,dat is 
8598 hex., ten tweede de start- en eindadressen en de 
byte-lengte: 

DEEL-1: start 8598 h. , einde C4FF h. 
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Figuur 2 


DEEL-2: start C500 h., einde EFOO h. 

De byte-lengte (alleen van DEEL-2) berekenen we op de 
computer door het volgende in te toetsen: 

PRINT HEX$(&hEF00 - &hC500 +1). 

Voor DEEL-2 levert dit dus een lengte op van 2A01 h. 
bytes. 


Naar disk schrijven 

We zijn nu zover dat DEEL-1 en 2 naar de disk geschreven 
kunnen worden. DEEL-1 kan eenvoudig met deze adres 
bezetting naar de disk geschreven worden; het laat de disk- 
ruimte ongemoeid en levert dus geen moeilijkheden op. Zet 
de data-recorder klaar en laadt met BLOAD"CAS:" zonder 
’R, DEEL-1 in het computer geheugen. Na het laden be¬ 
vindt DEEL-1 zich dus op 8598 hex. tot en met C4FF hex. 
DEEL-1 kan nu naar disk geschreven worden vanuit het 
RAM- geheugen met: 

BSAVE"A:DEEL-1.BIN",&h8598,&hC4FF,&hF516 

Op de toevoeging ’&hF516 het nieuwe executie-adres 
voor DEEL-1, komen we verder in dit artikel op terug. Goed, 
DEEL-1 staat nu op disk, nu DEEL-2 nog. DEEL-2 beslaat 
grotendeels de diskruimte; we kunnen dit deel dus niet zon¬ 
der meer in het geheugen laden. MSX-basic heeft echter 
een mogelijkheid om machinetaalblokken te kunnen ver¬ 
schuiven (offset). Tijdens het laden gaan we daar gebruik 
van maken, het commando is: 

BLOAD "CAS:"’verschuiving 

Op de plaats van Verschuiving’ komt een hex.getal te staan 
dat aangeeft hoeveel bytes lager in het geheugen het 
DEEL-2 moet worden ingeladen. 

Normaal zit DEEL-2 op C500 h. tot en met EFOO. We gaan 
nu DEEL-2 verplaatsen naar bv. 9500 h.. De verschuiving 
berekenen we op deze wijze : we toetsen het volgende in : 
PRINT HEX$ ( &h9500-&hC500 ). De uitkomst is D000 h., 
nu kan DEEL-2 veilig geladen worden met: 

BLOAD "CAS:",&hD000 

DEEL-2 word nu in het geheugen geladen vanaf het nieu¬ 
we adres 9500 h. tot en met adres BF00 h. Door deze ver¬ 
schuiving komen we niet in conflict met de diskruimte en 
kunnen dit deel nu normaal naar disk schrijven,dus: 
BSAVE "A:DEEL-2.BIN",&h9500,&hBF00,&hF500 
Op het laatste getal &hF500, komen we later op terug. 
Even resumeren, wat we nu hebben op disk en wat zijn de 
gegevens: 

DEEL-1 van 8598 h. tot C4FF h. met als exec.adres F516 
h. Als we dit deel later laden staat het dus reeds op het juis¬ 
te begin-adres, want dat is niet veranderd. 

DEEL-2 van 9500 h. tot BF00 h. met als executie-adres 
F500 h.. Dit deel staat niet op de juiste adressen : het zal 
dus bij het laden van disk verschoven moeten worden naar 
het originele begin adres nl. C500 h. 



sprong maakt naar dit adres, alwaar zich een routine be¬ 
vindt die er voor zorgt dat: 

a. het juiste slot en het eerste 16 K. blok van de RAM 
geselecteerd wordt. 

b. DEEL-2 wegschrijft naar dit 16 K. blok.(pagina-O) 

c. men terugkeert naar BASIC. 

Dit tijdelijk 'geparkeerde’ DEEL-2 zal dus later weer opge¬ 
haald dienen te worden uit dat schaduw-RAM en op de ori¬ 
ginele adressen geplaatst moeten worden nl. op C500 h. 
tot EF00 h. Voorlopig echter laten we DEEL-2 rustig even 
staan en gaan we ons bezig houden met DEEL-1. 

DEEL-1 staat op disk met de originele begin- en eindadres- 
sen ; daar hoeft men dus niets aan te veranderen.Het exe¬ 
cutie-adres welke we aan DEEL-1 meegegeven hebben, is 
F516 hex.. Op dit adres staat weer een routine (zie progr.) 
die er voor zorgt dat: 

a. de disk-drive wordt stilgezet; beide delen zijn in het ge¬ 
heugen, de drive is niet meer nodig. 

b. de computer komt terug naar BASIC en het gehele RAM- 
geheugen van 8000 h. tot F380 h. kan gereserveerd wor¬ 
den voor ons programma met ’CLEAR 100,&HF380 ’. 

c. het schaduw RAM, slot van 0000 h - 3FFF h. gekozen 
wordt. 

d. DEEL-2 verplaatst wordt naar de originele adressen, 
dus naar C500 h. tot EFOO h. 

e. er vervolgens naar het originele executie adres 
gesprongen wordt bv. 8598 hex. en het gehele 
programma gestart wordt. 

In principe is hiermee het machinetaal-programma MC- 
SPLIT en zijn funkties nu besproken, zie listing. 


Hoe gaan we nu verder 

Deze 2 delen kunnen niet na elkaar in het RAM-geheugen 
geladen worden het ene deel zal het andere overschrij¬ 
ven,vernietigen en dat is niet de bedoeling. Daarom is het 
nodig om DEEL-2 na het laden van disk tijdelijk ergens te 
'parkeren’ in het geheugen daar waar het ons niet in de weg 
staat. Dit 'parkeren' gebeurt in het schaduw-RAM van onze 
64 KB machine; het stuk RAM dat normaal niet ter beschik¬ 
king is onder basic. Hier vinden we voldoende parkeerruim¬ 
te voor het DEEL-2 de bovenste 16 K. wordt hiervoor ge¬ 
bruikt van 0000 h tot 4000 h. (zie figuur 2). 

Het executie-adres waarmee DEEL-2 naar disk is geschre¬ 
ven ( F500 h.), zorgt ervoor dat na het laden de CPU een 


Basic lader 

Om de diverse delen van disk te laden gebruiken we een 
basic programma dat er als volgt uit moet zien : 

10 CLS:KEY OFF:A=INP(&hA8):B=A/80 
20 POKE &hF545, A+B :’ slot select 
30 LOCATE 10,10 : PRINT " LOADING...." 

40 BLOAD "MCSPLIT.BIN".’ zonder R 
50 BLOAD "DEEL- 2.BIN",R :’eerst deel-2 
60 BLOAD "DEEL- I.BIN",R :’dan deel-1 
70CLEAR 100,&hF3 
80 : DEFUSR=&HF525 80 A=USR(0) 

Save de basic-lader naar disk met bv. de naam van het ma- 
chinetaalblok waarvoor het gebruikt gaat worden 'SA¬ 
VE'^ AAM. BAS" 
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MCSPLIT kan gebruikt worden om elk willekeurig blok ma¬ 
chinetaal, wat te groot is om onder Disk-Basic te laden en 
wat de diskruimte overschrijft op een correcte wijze naar 
disk te schrijven en te laden. Zoals reeds aangegeven, die¬ 
nen de hier gebruikte start- en eindadressen slechts als 
voorbeeld. Als MCSPLIT in de praktijk gebruikt gaat wor¬ 
den, is het nodig om de start- en eindadressen aan te pas¬ 
sen evenals de lengte en het originele executie-adres (zie 
listing). 

Regel 400 2 bytes voor het start adres DEEL-2. 

Regel 420 idem voor de lengte van DEEL-2 in hex. 
Regel 620 idem voor het orig.start adres DEEL-2 
Regel 630 zelfde waarden als regel 420 (lengte) 

Regel 670 executie-adres van het hele blok 

Voorbeeld : Startadres DEEL-2 is bv. &h 8850, regel 400 
wordt dan: 

400 DATA 21,50,88 :’LD HL, 8850 h 

Let op : eerst dus het lage byte en dan het hoge byte invul¬ 
len : 50, 88is 8850 h. enz. Als deze regels aangepast 
zijn,voor het machinetaal blok van uw keuze wat naar disk 
moet, run dan MCSPLIT en schrijf deze routine ook naar 
disk: 

BSAVE "MCSPLIT.BIN", &hF500,&hF543 

Deze wordt immers geladen vanuit de basic-lader en doet 
het 'moeilijke werk’ voordat DEEL-1 en DEEL-2 geladen 
worden.(zie figuur 3). De naam 'MCSPLIT.BIN ’ kunt u na¬ 
tuurlijk ook aanpassen naar eigen inzicht. 


Figuur 3 




F380 h 


F500 h 

start me.routine 



(exec.adres DEEL-2) 



F516 h (exec adres 



DEEL-1) 


F54 3 h 

einde 


- F545 h- 

slot data 



FFFF h 


Beperkingen 

Voorde meeste machinetaal blokken zal MCSPLIT een uit¬ 
stekend hulpmiddel zijn om deze naar disk te schrijven 
(MSX-I computers). 

Er zijn enkele programma’s welke bv. uit 2 of meer ma¬ 
chinetaal blokken bestaan. Indien het eerste programma 
gebruik maakt van de schaduw-RAM, pagina-0 om bv. data 
in weg te zetten, dan wordt deze data vernietigd. 

Immers met het laden van het 2e programma ( opgesplitst 
in DEEL-I en 2 ) wordt pagina 0 door ons gebruikt als 'par¬ 
keer ruimte ’. Het totale programma zal in dat geval niet 
goed funktioneren. Maar niet getreurd, er zijn vele pro¬ 
gramma’s welke met de hier beschreven methode en 
MCSPLIT op disk gezet kunnen worden ! 

W. vd. Kuilen 

100* -* 

110 ’ * VERPLAATS ROUTINE MCSPLIT V-I.l WK 
12-04-87* 

120 ’*-* 

130 ’ * Doel: MC-blokken van 8000-F380 h van en 
naar disk, MSX-I * 

140*-* 

150 ’* Laad DEEL-2 met bv D000h offset in naar 


9500-BF00 h.(exec.&Hf500) 

160 ’* MCSPLIT verplaatst DEEL-2 naar pag-O.Laad 
DEEL-I in 8598 h (original) 

170 ’* De disk stopt dan. (exec.&hF516) Terug naar 
Basic en Clear100,&hF380 
180’* voor max.geheugen 8000-F380 h.DAN 
DEFUSR=&HF525:A=USR(0): dit haalt 
190 ’* DEEL-2 uit pag-0 naar C500-EF00 h. (exec. 
&hF525) 

200 ’* Jump naar originele exec-adres van het totale 
blok. 210 #* De routine MCSPLIT zit van 
&HF500-&HF543) 

220 ’* 

230 ’*F500 h = Ie exec.adres, DEEL-2 
240 ’* F516 h = 2e exec.adres, DEEL-I 
250 ’* F525 h = 3e exec.adres, DEEL-I 
260 ’* 

270 ’* F545 h = Slot poke-adres : 

A=INP(&HA8):B=A/80: POKE&HF545.A+B 

280’ 

290’ 

300 1=0 
310 READA$ 

320 IF A$="$$"THEN END 
330 A=VAL("&H"+A$):POKE&HF500+l,A:l=l+l:GOT0 
310 

350 ’== slot-call + parkeer DEEL-2 in pagina-0 == 

360’ 

370 DATA DB,A8 :’IN A,(&HA8) Start routine F500 h 
380 DATA F5,F3 :’PUSH AF / Dl 
390 DATA CD,3D,F5:’CALL F53D h 
400 DATA 21,00,95:’LD HL,9500h start-adres DEEL-2 
is 9500 h (00,95) 

410 DATA 11,90,00:’LD DE,0090h 
420 DATA 01,01,2A:’LD BC,2A01h lengte DEEL-2 in 
hex. is 2A01 h (01,2A) 

430 DATA ED,B0 r’LDIR 

440 DATA Fl :’POP AF 

450 DATA D3,A8 :’OUT(&HA8),A 

460 DATA C9 :’RET to basic 

470’ 

480 DATA 01,00,02:’LD BC,0200h start routine F516 h. 

490 DATA F3,C5 :’DI / PUSH BC 

500 DATA CD,9F,FD:’CALL FD9Fh 

510 DATA Cl :’POP BC 

520 DATA 0B :’DEC BC 

530 DATA 78 :’LD A,B 

540 DATA BI :’OR C 

550 DATA 20,F5 :’JR NZ,LABEL 

560 DATA C9 :’RET to basic 570 ’ 

580 DATA DB,A8 :’IN A,(&HA8) start routine F525 h. 
590 DATA F5,F3 :’PUSH AF / Dl 
600 DATA CD,3D,F5:’CALL F53D h 
610 DATA 21,90,00:’LD HL,0090h 
620 DATA 11,00,C5:’LD DE,C500h orig.start-adres 
DEEL-2 is C500 h (00,C5) 

630 DATA 01,01,2A:’LD BC,2A01h lengte DEEL-2 in 
hex. is 2A01 h (01,2A) 

640 DATA ED,B0 :’LDIR 
650 DATA Fl :’POP AF 
660 DATA D3,A8 :’OUT(&HA8),A 
670 DATA C3,98,85:’JP 8598 h orig.exec.adres totale 
blok. (98,85) 

680’ 

690 DATA 3A,45,F5:’LD A,(F545 h) bevat slot 
gegevens. 

700 DATA D3,A3 :’OUT(&HA8),A 
710 DATA C9 :’RET 
720 DATA "$$" :’END 


18 


MSX Info 5/87 






















A 

DATA & 

TELECOMMUNICATIE 

MODEMS 

VOOR 

PERSONAL 

COMPUTERS 



TRON B.V. Computer Technology 

Velperweg 58 

Postbus 144, 6800 AC Arnhem 
Telefoon 085 - 426.777 

Fax 085 - 430.793 

Telex 75075 des nl 


Computer Technology 












Een artikelenserie waarin de veelzijdige grafische mogelijkheden van de MSX-computer vanachter 
het toetsenbord geëxploreerd worden. In dit derde deel komen de sprites aan bod. 


GRAFISCH WERKEN MET DE MSX (3) 


Sprites 



E en serie over computergraphics zonder Sprites, dat kan natuurlijk niet. 

Na de vele voorbeelden in de vorige aflevering, is ook in deze uitgave 
ruimte gereserveerd voor de fantastische figuurtjes, die regelrecht uit de 
spelletjeswereld komen. Zonder lang stil te staan bij de opbouw van sprites 
(in het vorige hoofdstuk bespraken we al een fraaie sprite-ontwerper) moe¬ 
ten er toch enkele woorden aan gewijd worden. 

De in het hoofdstuk afgebeelde spri- wat grof. Op het scherm komen ze wens kenbaar maken ten aanzien van 

tes zijn van het 16x16 type. Omdat ze echter uitstekend tot hun recht. In de de afbeeldingsmaatstaf op de buis. 

relatief groot afgedrukt zijn, lijken ze SCREEN-opdracht kunnen we onze 


Listing l.Piraat. 

10 ’ pinaat 

20 SCRFTN 5, 7 : OOI OR 15, 12, 12: Cl 8 
30 FOR J=1 TO 2 
40 S$="" 

50 FOR 1=1 TO 32:READ S:S$=S$+CHR$(S):NEXT I 
60 SPRITES(J)=S$ 

70 NEXT J 

80 DATA 32, 33, 19, 14, 7, 8, 26, 24, 26, 5, 2, 81, 124, 154, 133, 255 
90 DATA 2, 130, 196, 120, 240, 8, 172, 140, 44, 208, 32, 202, 30, 63, 113, 255 
100 DATA 127, 127, 63, 21, 63, 31, 30, 30, 30, 30, 30, 12, 204, 252, 252, 236 

110 DATA 254, 254, 254, 86, 254, 254, 118, 119, 117, 34, 36, 40, 32, 32, 32, 32 

120 LINE <0, 133) - <255, 133) , 10 
130 PUT SPRITE 1, (100, 100) , 1, 1 
140 PUT SPRITE 2, (100, 116) , 1, 2 
150 FOR 0=1 TO 200:NEXT Q 
160 SOUND 0,250: SOUND 1,0: SOUND 6,20 
170 SOUND 7, 20: SOUND 13,20 

180 FOR 1 = 15 TO 0 STEP 05:SOUND 8,I:NEXT I 
190 SPRITE$<3)="*"+"*" 

200 FOR 1=0 TO 104 
210 PUT SPRITE 0, (1,116), 15, 3 
220 NEXT I 

230 PUT SPRITE 1, (116, 116), 9, 1 
240 FOR Q=1 TO 500:NEXT 0 
250 GOTO 130 
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SCREEN 5,2 geeft kleine Sprites, 
SCREEN 5,3 geeft ze twee maal 
vergroot weer. _ 

Sprites kunnen enkelvoudig opge¬ 
bouwd worden. Een figuurtje wordt 
dan afzonderlijk gebruikt. Veel aardi¬ 
ger is het, als meerdere sprites in 
combinatie gebruikt worden. De piraat 
hiernaast is daar een voorbeeld van. 
Speciale effecten kunnen dan bereikt 
worden als in een gevecht de tegen¬ 
stander omgebouwd wordt tot twee af¬ 
zonderlijke delen. 

Ook het afbeelden van Sprites met 
verschillende kleuren over elkaar 
geeft leuke effecten. Een bloem met 


verschillend ge¬ 
kleurde onderde¬ 
len is als voorbeeld 
van deze techniek 
opgenomen. 
Sprites kunnen 
ook geschakeld 
weergegeven wor¬ 
den. Het rijtje Am¬ 
sterdamse grach¬ 
tenhuizen ziet er 
heel aardig uit als 
het enkele malen 
naast elkaar afge- 
beeld wordt. 



Listing 2.Bloem 

10 * bloem 

20 SCREEN 5, 3: COLOR 15, 3, 3:CLS 
30 FOR J=1 TO 4 
40 S$="" 

50 FOR 1=1 TO 32:READ S:S$=S$+CHR$(S):NEXT I 
60 SPRITES<J)= S$ 

70 NEXT J 

80 DATA 1, 98, 82, 42, 26, 1, 121, 134, 134, 121, 1, 26, 42, 82, 98, 1 

90 DATA 128, 70, 74, 84, 88, 128, 158, 97, 97, 158, 128, 88, 84, 74, 70, 128 

100 DATA 0, 1, 33, 17, 1, 0, 0, 121, 121, 0, 0, 1, 17, 33, 1, 0 

110 DATA 0, 128, 132, 136, 128, 0, 0, 158, 158, 0, 0, 128, 136, 132, 128, 0 

120 DATA 254, 156, 140, 196, 228, 248, 128, 0, 0, 128, 248, 228, 196, 140, 156, 254 

130 DATA 127, 57, 49, 35, 39, 31, 1, 0, 0, 1, 31, 39, 35, 49, 57, 127 

140 DATA 1, 1, 1, 57, 125, 255, 195, 131, 41, 17, 41, 17, 85, 57, 17, 255 

150 DATA 128, 128, 128, 128, 140, 158, 191, 227, 192, 148, 136, 148, 136, 156, 

136, 255 

160 PUT SPRITE 1, (100, 100), 15, 1 
170 PUT SPRITE 2, (100, 100), 6, 2 
180 PUT SPRITE 3, <100, 100), 12, 3 
190 PUT SPRITE 4, (100, 132) , 12, 4 
200 GOTO 160 


Listing 3. Amsterdam 

10 * Amsterdam 

20 SCREEN 5, 3: COLOR 15, 7, 7=CLS 
30 S$="" 

40 FOR 1=1 TO 32:READ S:S$=S$+CHR$<S):NEXT I 
50 FOR 1=1 TO 8:SPRITES(I)=S$:NEXT I 

60 DATA 1, 131, 198, 239, 169, 169, 175, 239, 169, 169, 175, 233, 169, 175, 174, 237 

70 DATA 1, 131, 198, 239, 43, 43, 235, 239, 42, 42, 234, 175, 172, 44, 236, 236 

80 LINE (0, 134) - (255, 138) , 4, BF 

90 CIRCLE (20, 10), 10, 10, , , 3/2 

100 PAINT(20, 10), 10 

110 FOR 1=1 TO 8 

120 PUT SPRITE I, (32*1, 100), 6, I 
130 NEXT I 
140 GOTO 140 
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van animatie techniek is met Sprites 
gauw in elkaar gesleuteld. Een glim¬ 
lach op verzoek. 

Het is wellicht interessant over een 


tes op papier afgedrukt kunnen wor¬ 
den. Een sprite-bibliotheek kan dan 
netjes geordend worden. Ze kunnen 
dan zelfs per vel van vier geruild wor- 


gramma dat onze wensen op dit ge¬ 
bied vervult, is op enkele punten prin- 
terafhankelijk. In het programma zijn 
die plaatsen aangegeven. 


Listing 4. Smile 


10 * Smile 

20 SCREEN 5, 3: COLOR 15, 4, 4 : CLS 
30 FOR J=1 TO 2 
40 S$="" 

50 FOR 1=1 TO 32:READ S:S$ = S$+CHR$ (S) :NEXT I 
60 SPRITES(J)=S$ 

70 NEXT J 

80 DATA 3, 15, 31, 63, 127, 123, 255, 255, 255, 239, 119, 123, 60, 31, 15, 3 

90 DATA 192, 240, 248, 252, 254, 222, 255, 255, 255, 247, 238, 222, 60, 248, 240, 192 

100 DATA 3, 15, 31, 63, 127, 123, 255, 255, 255, 252, 123, 119, 63, 31, 15, 3 

110 DATA 192, 240, 248, 252, 254, 222, 255, 255, 255, 63, 222, 238, 252, 248, 240, 192 

120 PUT SPRITE 1, (100, 100>, 10, 1 150 FOR 0=1 TO 500:NEXT O 

130 FOR Q=1 TO 500:NEXT O 160 FOR 0=1 TO 500:NEXT O 

140 PUT SPRITE 1, (100, 100), 11, 2 170 GOTO 120 


Listing 5. Sprite printer 


10 REM sprite printer 
20 CLSrCLEAR 1000 

30 LOCATE 7, 10:PRINT"Printer aan... hit Key 
40 A$=INPUT$(1) 

50 DIM A(16), B(16), AS(16), BS(16) 

60 REM #### PRINTER AFHANKELIJK #### 

70 LPRINT CHRS C27) ;CHRS(51) ;CHRS(18); 

60 FOR J=1 TO 16 
90 LOCATE 7, 10:PRINT" 

100 LOCATE 10, 10:PRINT" DATA";J; 

110 INPUT A<J) 

120 AS(J)=BIN$(A(J)) 

130 A=8-LEN(AS(J)) 

140 IF A=0 THEN 160 
150 FOR 1=1 TO A 
160 AS(J)= "0"+AS ( J) 

170 NEXT I 

180 NEXT J 

190 FOR J=1 TO 16 

200 LOCATE 10, 10:PRINT" 

210 LOCATE 10, 10:PRINT" DATA";J+16; 

220 INPUT B(J) 

230 BS(J)=BINS(B(J) ) 

240 B=8—LEN CBS(J) ) 

250 IF B=0 THEN 290 
260 FOR 1=1 TO B 
270 B$ (J) ="0"-*-B$ (J) 

280 NEXT I 
290 NEXT J 


300 FOR J=1 TO 16 

310 FOR 1=1 TO 8 

320 PS=MIDS(AS ( J) , I, 1) 

330 IF P$="0" THEN LPRINT " "; 

340 REM #### PRINTER AFHANKELIJK #### 

350 IF P$="l" THEN LPRINT CHRS (178); 

360 NEXT I 

370 FOR 1=1 TO 8 

380 P$=MID$(BS(J) , I, 1) 

390 IF PS="0" THEN LPRINT " "; 

400 REM #### PRINTER AFHANKELIJK #### 

410 IF P$="l" THEN LPRINT CHRS(178>; 

420 NEXT I 

430 LPRINT 

440 NEXT J 

450 LPRINT 

460 REM #### PRINTER AFHANKELIJK #### 
470 LPRINT CHRS (27> ;CHRS(51) ;CHRS (27) ; 
480 LPRINT:LPRINT"DATA" 

490 FOR 1=1 TO 16:LPRINT A(I);:NEXT I 

500 LPRINT 

510 LPRINT"DATA" 

520 FOR 1 = 1 TO 16=LPRINT B (I);:NEXT I 
530 RUN 
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Sprites worden vastgelegd door 32 
getallen. Als er 8x8 sprites afgedrukt 
moeten worden zal het programma 
iets gewijzigd moeten worden. Dat wil 
zeggen, in de regels 80 en 190 zetten 
we 8 in plaats van 16. Het zou netjes 
zijn ook de DIM-opgave in regel 50 
aan te passen. Voor de werking heeft 
dat echter geen enkel effect. Ook spri¬ 
tes uit programma’s in tijdschriften en 
boeken kunnen met het programma 
op een nette manier bewaard worden 
voor later gebruik. We hebben al even 
kunnen zien dat sprites zich op een 
gemakkelijke manier tot leven laten 
brengen. Nu we helemaal thuis zijn op 
dit gebied, is het verstandig er eens 
wat mee te spelen. Het nu volgende 
geeft een extra dimensie aan het won¬ 
derlijke wereldje van de sprites. Ze lo¬ 
pen, vliegen, zwemmen en praten, op 
verzoek, door ze op te nemen in klei¬ 
ne programma’s. 


Animatie, sprites tot leven ge¬ 
bracht 

Vliegen is voor de mens in vroeger tij¬ 
den altijd een droom geweest. Sprites 
hebben er geen moeite mee, zeker 
niet als de betreffende sprite boven¬ 
dien nog een vogel is. 

Is het niet wonderbaarlijk hoe natuur¬ 
getrouw dit gevederde dier zich door 
het hemelruim beweegt? Met elke 
wiekslag demonstreert hij zijn klimver- 
mogen, om uiteindelijk boven in het 
beeld uit het gezichtsveld te verdwij¬ 
nen. Met slechts vier sprites en wat 
handigheidjes is zo’n natuurgetrouw 
effect te bewerkstelligen. Schrik niet 
van de indrukwekkende rij DATA-een- 
heden. Het typen van getallen valt 
reuze mee. Mocht U de foutmelding 
"OUT OF DATA” op het scherm aan¬ 
treffen, tel dan eerst na of elke DATA- 
regel inderdaad zestien getallen be¬ 
vat. Vooral als een getal enkele malen 


achter elkaar voorkomt, wordt er al 
gauw één overgeslagen. Sprites zijn 
het leukst als ze op SCREEN n,2 ac¬ 
tief zijn. Toch moet U niet vergeten ze 
ook eens in het groot op SCREEN n,3 
te bekijken. Dat geeft soms toch een 
aardig effect. Het eigenlijke program¬ 
ma beslaat de regels 160 tot en met 
290. De vier sprites worden in een be¬ 
paalde volgorde na elkaar op het 
scherm gezet. Echter niet precies op 
dezelfde plaats. Als de vleugels om¬ 
hoog gaan, zakt de vogel iets. Die da¬ 
ling wordt weer opgeheven als de 
vleugels met kracht de vliegbeweging 
maken. Hij wint dan zelfs wat extra 
hoogte (regel 170,1-3). Door alle spri¬ 
tes op hetzelfde transparant af te 
beelden is er altijd maar één zicht¬ 
baar. De tussenliggende wachtlussen 
maken de beweging vloeiend. Ziet U 
liever een TURBO-vogel? Laat de Q 
dan niet doorlopen tot 100, maar 


Listing 6. Vogelvlucht. 



10 * Vogelvlucht 

20 SCREEN 5, 2 : COLOR 15, 4, 4:CLS 
30 FOR J=1 TO 4 
40 S$ = "" 

50 FOR 1=1 TO 32 : READ S : S$=S$+CHR$CS) : NEXT I 
60 SPRITES CJ)=S$ 

70 NEXT J 

80 DATA 0, 0, 0, 0, 1, 255, 7, 1, 2, 0, 0, 0, 0, 0, 0, 0 

90 DATA 0, 0, 0, 0, 128, 255, 224, 128, 64, 0, 0, 0, 0, 0, 0, 0 

100 DATA 0, 0, 0, 96, 25, 7, 3, 1, 2, 0, 0, 0, 0, 0, 0, 0 

110 DATA 0, 0, 0, 6, 152, 224, 192, 128, 64, 0, 0, 0, 0, 0, 0, 0 

120 DATA 0, 96, 16, 8, 5, 3, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0 

130 DATA 0, 6, 8, 16, 160, 192, 128, 128, 64, 0, 0, 0, 0, 0, 0, 0 

140 DATA 0, 0, 0, 0, 1, 3, 7, 9, 18, 32, 64, 0, 0, 0, 0, 0 

150 DATA 0, 0, 0, 0, 128, 192, 224, 144, 72, 4, 2, 0, 0, 0, 0, 0 

160 FOR 1=190 TO 0 STEP -1 

170 PUT SPRITE 1, <100, 1-3), 10, 1 

180 FOR 0=1 TO 100:NEXT O 

190 PUT SPRITE 1, <100, 1-2) , 10, 2 

200 FOR 0=1 TO 100:NEXT O 

210 PUT SPRITE 1, <100, 1-1), 10, 3 

220 FOR 0=1 TO 100:NEXT O 

230 PUT SPRITE 1, <100,1+0,10,2 

240 FOR 0=1 TO 100:NEXT O 

250 PUT SPRITE 1, <100, 1 + 2), 10, 1 

260 FOR 0=1 TO 100 : NEXT-- O 

270 PUT SPRITE 1, <100, I) , 10, 4 

280 FOR 0=1 TO 100:NEXT O 

290 NEXT I 

300 SCREEN 5,2:GOTO 160 
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SBimows 


SOFT© 


Tel. 05668-453 

MSX-1 SOFTWARE 

EASYCOPY+: 

afdruk scherm 2 in 4 kleuren voor sony/toshi- 
ba plotter/printers. CAS. ƒ 35,- 

EASY TG-32: 

tekst en grafische verwerker met nadruk op 
grafics, sony/toshiba plotters en msx-matrix 
printers CAS. ƒ 55,- 

MEDICO: 

wat heeft uw kind en wat moet u doen? 
vraagt u maar! CAS. ƒ 35- 

DES 1: 

digitaliseringsprogramma met 64 x 48 beeld¬ 
punten, 16 kleuren CAS. ƒ 40- 

DES 2: 

digitaliseringsprogramma met 256 x 192 
beeldpunten, 

16 kleuren 
CAS. ƒ 50,- 

PALET: teken programma met 136 kleuren, 
32 x 96, msx-1 CAS. ƒ 35,- 

MSX-1 -STARCOPY: 

Afdruk screen 2 in 6 grijstinten ondersteunt 
4 grafische modes. Ook geschikt voor Epson 
cwmpatibelen. CAS. ƒ 50- 

MSX-1 COPY 

Afdruk scherm-2 in zes grijstinten, 
voor MSX matrix printers^ 

CAS. ƒ 40,- 


MSX-1 GE Copy 

Afdruk scherm-2 in zes grijstinten, 
voor General Electric Printers 
CAS. ƒ 50,- 




MSX-1 ROMPACK COPIER 

Maak van uw Rompack een laadbare back-up 
op cassette. 

CAS. ƒ 75,- 


gS0& 



MSX-2 SOFTWARE 

MSX-2 EASYCOPY: 

(werkt met EDDY 2) 

screenafdruk programma voor sony/toshiba 
plotters, 4 kleuren, alle grafische schermen, 
alle pagina’s DISK ƒ 49,90 

MSX-2 COPY: 

•screenafdruk programma voor MSX-matrix 
printers grijstinten, alle grafische schermen, 
alle pagina’s DISK ƒ 49,90 

MSX-2-STARCOPY: 

Screenafdruk programma voor Star-printers 
en Epson compatibelen. Grijstinten, alle grafi¬ 
sche schermen en alle pagina’s. DISK ƒ 59,90 

MSX-2 GE COPY: 

screenafdruk programma voor General Electric^ 
printers, grijstinten, alle grafische 
schermen, alle pagina’s 
DISK ƒ 59,50 


MOUSE DIGITISER: 

Digitaliseren met uw muis. Met 5 verschillende 
schaalmogelijkheden. Wordt geleverd met 
zelfklevende folie voor muis, dus geen schroe¬ 
ven en boren!!! DISK ƒ 79,90 

MSX-2 DES: 

digitaliseringsprogramma 212 x 192 beeld¬ 
punten, 2 soorten raster grof en fijn, 16 kleu¬ 
ren, 3 pagina’s, voor de mooiste schermen 
DISK ƒ 79,90 

MSX-2 PALET: 

supertekenprogramma voor de echte artiest! 
KEUZE VAN 136 KEUREN UIT EEN TOTAAL 
VAN 100.000! 192 x 256 beeldpunten. Keuze 
uit meer dan een miljard karaktersets!!! Teke¬ 
ningen kunnen over elkaar heen gesuperim- 
posed worden. 

MSX-2 CATABASE 

Maak een catalogus en bibliotheek van al uw 
software, ook geschikt voor platen, boeken, 
e.d. Met uitprintmogelijkheid. 

DISK ƒ 69,90 


nogenjKneia. 

00 * 



HOE TE BESTELLEN: 

STUUR EEN BANKCHEQUE OF GIRO OF 
EEN POSTCHEQUE OF GIRO NAAR 
SPARROWSOFT 
ANTWOORDNUMMER 6986 
8900 WC LEEUWARDEN 
Vermeld vooral uw naarn, adres en 
bestelling. Deze aktie geldt tot en met 
31 december 1987. 
SPARROWSOFT MAAKT SOFTWARE 
WEER BETAALBAAR! 



OMDAT WE ALS 
ONAFHANKELIJK MSX- 
SOFTWARE-HOUSE NU EEN 
JAAR BESTAAN! 

JA U LEEST HET GOED! 

als u nu bij ons een bestelling doet 
krijgt u van ons een cassette of disk 
met een fraai programma gratis!!! 


Wegens groot succes van 


onze vorige aktie gaan wij door 


met een nieuwe 


gratis feestaanbieding 


Dit programma is voor u! 

MSX karakter editor: 

Met dit programma kunt u uw eigen 
karakterset ontwerpen voor uw 
MSX 1 of MSX 2 computer, 

Het werkt ook in de grafische schermen. 


U ZIET HET EEN FRAAI' 
PROGRAMMA! 

gratis voor u als u een bestelling bij ons 


doet en een fraaie manier om met ons en 
onze voordelen kennis te maken, voordelen 
zoals: 

★ ★ VOLLEDIGE COMPATIBILITEIT ★★ 

geen gezeur meer met software die 
het niet doet 

★ ★DIREKT RECORDING ★★ 

door direkt van de computer op te 
nemen een mastercopy kwaliteit 
zonder dropouts (TDK) 

★ ★ NEDERLANDSTALIG ★★ 


Mocht u van onze vorige aktie gebruik willen maken dan is dat ook mogelijk 



































neem bijvoorbeeld 10. Wilt U daaren¬ 
tegen het vlieggedrag van vogels na¬ 
der bestuderen, maak er dan slow¬ 
motion van door het getal in de wacht- 
lussen bijvoorbeeld in 1000 te veran¬ 
deren. De gebruikte sprites worden 
dan één voor één zichtbaar. 

De haast die de vogel heeft met het 
getal 10 in de wachtlus wordt ook ten 
toon gespreid in het volgende pro¬ 
gramma, waarin we proberen de loop¬ 
beweging te imiteren. Voor dit doel 
hebben we een figuurtje nodig met 
een aantal benen. Door er steeds 
maar twee te laten zien, voorkomen 
we de indruk met een schaap met vijf 
poten van doen te hebben. De combi- 
natie-sprite is in de figuur afgebeeld. 


Ook hier is aan de beweging een klei¬ 
ne verticale verplaatsing toegevoegd. 
Hierdoor ontstaat een beweging die 
heel goed de normale loopbeweging 
weergeeft. Bij de horizontale verplaat¬ 
sing is rekening gehouden met het 
voetenwerk. Een voet die de grond 
raakt, mag niet bewegen. Een vooruit 
gerichte voet heeft de hoogste snel¬ 
heid. Om meer (of minder) vaart aan 
het kereltje te geven, kunnen de hori¬ 
zontale pijltoetsen gebruikt worden. 
Voer de snelheid maar eens flink op. 
De sprites die het boven- en het on¬ 
derlijf vormen verschuiven af en toe 
iets ten opzichte van elkaar. Dit pro¬ 
bleem doet zich voor bij gecombineer¬ 
de sprites. Voor de echt snelle actie is 


het dan ook beter enkele sprites te ge¬ 
bruiken. Als we het mannetje zo voor¬ 
bij zien rennen, dan vragen we ons af 
waarom hij zo’n haast heeft. Het vol¬ 
gende programma zal daar wellicht 
wat meer inzicht in geven. 

Met de meer dan diverse 16x16 spri¬ 
tes die in deze artikelenserie afge¬ 
beeld zijn, en de data voor vele ande¬ 
ren die in de programma’s zijn opge¬ 
nomen, is er voldoende materiaal 
voorhanden om de fantasie te prikke¬ 
len. 


Listing 7. Opzij opzij opzij 

10 * opziö opzij opzij 

20 SCREEN 5, 2 : COLOR 15, 6, 6:CLS 

30 LINE (0, 128)-(255, 128), 14 

40 FOR 1=1 TO 255 STEP 3 

50 LINE (I, 128-RND (1) *10) - (I, 128) , 3 

60 NEXT I 

70 FOR J=1 TO 4 

80 S$="" 

90 FOR 1=1 TO 32:READ S:S$=S$+CHR$(S):NEXT I 
100 SPRITES(J)=S$ 

110 NEXT J 

120 DATA 63, 63, 127, 127, 2, 2, 4, 4, 8, 8, 16, 16, 16, 16, 48, 240 
130 DATA 252, 252, 254, 254, 64, 64, 64, 32, 32, 63, 3, 1, 1, 0, 0, 0 
140 DATA 63, 63, 127, 127, 2, 2, 4, 4, 8, 8, 8, 8, 8, 8, 24, 120 

150 DATA 252, 252, 254, 254, 64, 64, 64, 64, 64, 64, 32, 16, 8, 12, 8, 16 

160 DATA 63, 63, 127, 127, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 6, 31 

170 DATA 252, 252, 254, 254, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 192, 192 

180 DATA 1, 2, 5, 12, 2, 1, 1, 1, 3, 3, 7, 7, 15, 11, 24, 27 

190 DATA 128, 64, 32, 32, 64, 128, 128, 128, 192, 64, 96, 96, 112, 1 12, 120, 248 
200 X=255:T=30 

210 X=X—5:Y=110:C=15:S=1:GOSUB 280 
220 X=X—3:Y=lll:C=15:S=2:GOSUB 280 
230 X=X _ 3:Y=112:C~15:S'3:GOSUB 280 
240 X = X—3:Y=111:C=15:S = 2:GOSUB 280 
250 T=T+5*(STICK(0)=7)-5*(STICK(0)=3) 

260 GOTO 210 

270 * subnoutine positie 

280 PUT SPRITE 0, (X, Y), C, S 300 FOR Q=1 TO T: NEXT O 

290 PUT SPRITE 1, (X, Y-16),C, 4 310 RETURN 


TiJtTi 
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Kleine advertenties 


Te koop Sony-Hitbit 

MSX-Sony-Hitbit B75P, in¬ 
gebouwde data-bank, 30 
spelen, ƒ 350.- tel. 03499- 
83310. 


SVI-738 aangeboden 

SVI-738 MSX-1, diskdrive 
en MSX-DOS, CP/M, width 
80, DOS boek, CP/M boek, 
Basic boek, draag-tas, +1 
mnd gar. ƒ 700,- tel.05610- 
4194. 


MSX-1 Te koop 

MSX-1 comp, d. drive, prin¬ 
ter, cass. recorder, kl.moni¬ 
tor, Toshiba keyboard (syn¬ 
thesizer unit), MT-base, 10 
disks met spelen/utilities, 
40 casettes, boeken, tel. 
04132-64900 


MSX-Sony en 
diskdrive 

Sony comp., Philips d.drive, 
datarecorder, software en 
boeken, ƒ 1000,- .Toshiba 
synthesizer ƒ 400,- tel. 
01620-27311. 


Te koop MSX-1 

MSX-1 comp, diskdrive, 
printerkabel,tekstverwer - 
king, database, games, Uti¬ 
lities, compiler, boe ken, 
tijdschriften, etc. ƒ 1100.- 
tel.043-610712. 


Software te koop 

Org. software, MSX Hunch- 
back, Manie Miner, Toshiba 
Basiccursus, ƒ 10,- per 
stuk. Nieuwe datacass, 
ƒ 1,50 per stuk, of 10 voor 
ƒ 12,50. Tevens gevraagd 
org. software, tel.01880- 
40883 


Te koop MSX-2 

Philips 8255, 2 diskdrive’s, 
3810 muis, Arcade joystick, 
data ree, software, boeken. 
Tel. 02507-17394 / 023- 
222468 


MSX Systeem 
aangeboden 
Inclusief 8 mnd. garantie, 
joystick, datarec, SBC 
muis, 500 progr. op disk, 
boeken en alles in orginele 
verpakking. MSX-1 soft¬ 
ware op disk. Tel 020- 
472234 


Printer te koop 

TXP 1000 met lint, papier, 
incl. garantie, ƒ 300,- 
Tel.020-977310 


MSX-1 te koop 

Compleet met diskdrive 
met interface, datarec, prin¬ 
ter, monitor, diskettes met 
opbergdoos, tafel, boeken, 
kabels. Tel.04132-73542 


Te koop NMS 8250 
Philips systeem, printer, kl. 
monitor, div acc, literatuur, 
tel 010-4805396 na 1800 u. 

Te koop 

MSX-Hardware 

Mothercard, 8 kan. 1/0, AD 
Converter, tel.075-311459. 

Te koop MSX-2 

Philips MSX-2 met 8 mnd. 
garantie, joystick, datarec, 
SBC muis, boeken, disket¬ 
tes met programma’s en al¬ 
les in orginele verpakking, 
tel 020-472234. 


Software aageboden 

Aackobase, Aackocalc, Aa- 
ckoscribe, Tasword, enz., 
H.Timmermans Beemder- 
hoekweg 2, 6095 NS Bae- 
xem. 


Te koop MSX-2 

Philips comp, 2 diskdrives, 
muis, Arcade joystick, data 
recorder, org. software, 
boeken, tijdschriften, tel. 
02507-17394 na 1800 u. 


Te koop MSX-1 

Diskdrive, tekstverwerker, 
compiler, database, Utili¬ 
ties, games, boeken, 
ƒ1.100,-, tel.043-601712. 

Te koop MSX-1 
systeem 

Bestaande uit computer, 
drive, printer, cassette-re- 
corder, kl.monitor, Toshiba 
keyboard met synthesizer 
unit, MT-Base, 10 diskbak 
met spellen, boeken, cas¬ 
settes, tel.04132-64900. 

Gezocht 

vertaalprogramma 

Voor de Commodore 64 
naar de MSX, tel. 05490- 
67530. 


Aangeboden Sony 
MSX 

Computer compleet, stof- 
kap, joystick, ƒ 400,- tel. 
02206-6000. 


Software ruilen 

Org. MSX software te ruil 
o.a. Similator Hero Chiller, 
tel.01856-2017. 

Aangeboden 

Balkberekening 

Programma op cas. of dis¬ 
kette, veel mogelijkheden, 
eenvoudig te bedienen, 
ƒ 55,- tel.015-141592 na 
1900 u. 


Te koop MSX-1 
Homecomputer, datarec, 
software o.a. Arkanoid, 
Storm, Rollerball, MT- Ba¬ 
se, tel.04168-3418. 


Aangeboden Toshiba 

Toshiba HX-10 met Fergu- 
son monitor, belastingcass, 
demoprog, software, 
ƒ 400,- tel.02154-11492 

na 1800 u. 


Te koop Spectra Video 

MSX spectra Video, drive, 
joystick, diskette’s,boeken, 
ƒ 750,- tel. 05930-5735. 


Aangeboden MSX-1 

Sanyo Comp, datarec, prin¬ 
ter, HistoftPascal, Assem- 
bler, joystick, tel. 02507- 
16132. 


Te koop MSX-1 
Met ingebouwde diskdrive, 
MSX-DOS, CP/M, Width 
80, Dos boek, disk basic 
boek, 1 mnd garantie, 
ƒ 700,-tel.05610-4194. 


Aangeboden MSX 

JVC computer, spelletjes, 
boeken, ƒ 250,- tel. 071- 
313836. 


CONTACTEN 


Contact gezocht 

Met andere MSX-Diskge- 
bruikers voor het uitwisse¬ 
len van informatie, tel. 
05610-5514 na 1700 u. 


MSX Disk gebruikers 

Graag contact gezocht met 
MSX-diskgebruikers voor 
het uitwisselen van infor¬ 
matie. Tel. 563298 (Nijme¬ 
gen) 

Contact gezocht 

Contact gezocht in het land 
met andere MSX-ers, tel. 
075-352399. 


Uitwisseling 

Contact gezocht met MSX- 
diskgebruikers,voor het uit¬ 
wisselen van informatie. 
Tel. 040-415022 
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MSX-NIEUWS 


Plaatjes printen; 
midden uit een spel 

Hoe lijkt je dat? Ergens midden in een 
snel spel de situatie 'bevriezen' of spel 
in ’slow-motion’ door laten gaan? 
Ping-pong bijvoorbeeld of Boxing. 
Ook heel aardig is, het spel op een 
mooi moment stilzetten en dan via 
een printer het hele beeldscherm af¬ 
drukken, eventueel in kleur. Zo kun je 
de mooiste plaatjes uit bijna elke spel- 
module opzoeken en op papier zetten. 
Dit en nog veel meer is mogelijk met 
de nieuwe spel-module ‘GAME MAS- 
TER’ van Konami (importeur Salasan 
Amsterdam). Alle mogelijke ingrepen 
zijn uit te voeren. Verandering van de 
hoogste score, verandering aantal 
spelers of start vanaf een hoger level. 
Al deze instellingen zijn vast te leggen 
om later weer te laden. Voor de pro¬ 
grammeurs onder de lezers: Ook de 
data van een screen zijn op te roepen 
en op de printer af te drukken. De op 
zo'n manier verkregen data van een 
plaatje kunnen eenvoudige als BA- 
SlC-file worden weg geschreven en 
zijn zodoende ook buiten het pro¬ 
gramma om op te roepen en te bewer¬ 
ken. Volgens de Engels/Franse hand¬ 
leiding is het mogelijk bijna alle Kona¬ 
mi Cartridges met deze module te be¬ 
werken. Niet alleen een aardig stukje 
gereedschap, maar zeker ook een 
leuke spel-manipulator. 

MSX Rom-pack ƒ 80,-. 


Piramide-springer 

Voor de speelhallen is pyramide- 
springereen oude bekende. Proberen 
met een springerig type alle blokjes in 
een piramide-achtige trap van kleur te 
veranderen door er op te springen. 
Spring er niet naast want dan donder 
je in het oneindige computer-heelal, 
en wat dat allemaal voor gevolgen kan 
weet niemand. 

Het spel ’QBERT’ van Konami (import 
Salasan) is een zeer uitgebreide en 
vernieuwde versie van dit beroemde 
speelhal-spel. Door op de, steeds 
weer in andere patronen op het beeld¬ 
scherm verschijnende, blokjes te 
springen verander ze van kleur. 

In dit spel is het de bedoeling steeds 
vijf blokjes zo te draaien dat er een rij¬ 
tje van één kleur ontstaat. 

Het lijkt erg gemakkelijk, maar valt 
best tegen. Vooral ook door de genie- 
pigerts die ineens boven of naast je 
verschijnen. Snel beslissen waarheen 
te vluchten, maar kies je allebei het¬ 


zelfde blokje als volgende doel, dan 
blijkt altijd weer dat jij degene bent die 
teveel is. De reis, voor één van je to¬ 
taal vijf levens, naar de computerhel 
kan beginnen. Het zeer uitgebreide 
spel biedt de mogelijkheid tot instel¬ 
ling van verschillen, moeilijkheids-le- 
vels die lopen via ‘Nieuweling’ en ‘Ge¬ 
talenteerde Amateur’ naar ‘Professio¬ 
nal’ en ‘Superstar’. 

De oplopende moeilijkheid zit hem 
meestal in het aantal keren dat een 
blokje moet worden gedraaid om de 
juiste kleur te krijgen, maar ook inge¬ 
wikkelde blokjespatronen maken dit 
tot een behoorlijk moeilijk spel. Tus¬ 
sen de eerder genoemde geniepigerts 
zit gelukkig zo nu en dan ook een we¬ 
zentje dat na aanraking voordeel op¬ 
levert, een ware verademing na al 
deze slopende avonturen. Mensen 
met zwakke zenuwen zijn bij voorbaat 
gewaarschuwd, voor ons is in dit spel 
is al menig zenuwslopend uurtje gaan 
zitten. 

MSX-Pack: ƒ69,-. 


BASICODE-3 
Programmatuur op 
verzamelcassette bijeen 

Alle BASICODE-3 programma’s die 
tussen juli 1986 en februari 1987 zijn 
uitgezonden via het wekelijkse radio¬ 
programma ‘De TROS en BASICO- 
DE-3’ (elke woensdag vanaf 17.41 op 
radio 5,1007 kHz), zijn nu op een eer¬ 
ste verzamelcassette bijeengebracht, 
samen met enkele programma’s die 
om diverse redenen niet werden uit¬ 
gezonden. In totaal bevat de cassette 
ruim 50 minuten computerprogram¬ 
ma’s in BASICODE. 

Deze verzamelcassette is samenge¬ 
steld door de Stichting BASICODE en 
wordt tegen kostprijs beschikbaar ge¬ 
steld. De cassette kan eenvoudig wor¬ 
den besteld door f 9,50 over te maken 
op girorekening 5591330 van de 
Stichting BASICODE te Eindhoven 
onder vermelding van "verzamelcas¬ 
sette 1De cassette wordt dan thuis¬ 
gestuurd; de prijs is inclusief verzend¬ 
kosten. 

BASICODE-3 blijkt een hernieuwde 
belangstelling voor het systeem BA¬ 
SICODE te hebben opgeleverd. Dit is 
ongetwijfeld mede te danken aan de 
in BASICODE-3 geïntroduceerde gra¬ 
fische mogelijkheden en aan de mo¬ 
gelijkheid om gegevens in de vorm 
van een bestand op cassetteband op 
te slaan. Deze gegevens kunnen weer 


worden ingelezen in elke computer 
waarvoor een BASICODE-3 vertaal¬ 
programma bestaat. 

De meeste thans beschikbare vertaal¬ 
programma’s staan op de cassette die 
meestal bij het BASICODE-3 boek 
wordt geleverd en dat gewoon in de 
boekhandel verkrijgbaar is. Dit betreft 
vertaalprogramma’s voor de Acorn E- 
lectron en BBC-computer, de Apple-ll 
familie, de Commodore 64 en 128, de 
Exidy Sorcerer, alle MSX-computers, 
de Philips P2000T en P2000M, alle 
Sinclair Spectrum modellen en tevens 
de Spectravideo SV.318 en SV.328. 
Vertaalprogramma’s voor de Acorn 
Master, de IBM PC en compatibelen, 
de Schneider CPC-familie en de Tan¬ 
dy Color Computer zijn nog niet op de 
cassette opgenomen, maar zijn wel 
apart verkrijgbaar. 

Een exemplaar van de verzamelcas¬ 
sette wordt u op aanvraag toegezon¬ 
den. 


CP/M voor de MSX2 

RVS-Datentechnik uit de BRD levert 
een CP/M Plus emulatie voor MSX2 
computers. Hiermee kunnen alle pro¬ 
gramma’s voor CP/M op de MSX2 ge¬ 
bruikt worden. Op de Berlijnse Funk- 
ausstellung werd een nieuwe versie 
geïntroduceerd, met een nog krachti¬ 
ger versie van CP/M Plus. Deze ver¬ 
sie draait op alle MSX2 machines met 
minimaal 128 KB Mapper-RAM. De 
CP/M ondersteunt alle europese ka¬ 
raktersets en met de speciale RAM- 
disk software kan een RAM-disk van 
maximaal 1 MB worden geïnstalleerd. 
Het CP/M Plus operating systeem 
voor de MSX2 bevat diverse handige 
‘Utilities’, zoals een tekstverwerker, 
een terminal programma, een ontwik- 
kelsysteem voor machinetaal (voor de 
8080 en de Z80). 

Daarnaast is er een hulp-systeem, 
file-transfer tussen MSX en CP/M dis¬ 
kettes mogelijk, evenals een bescher¬ 
ming met wachtwoorden van disket¬ 
tes en files. Het programma staat op 
twee 3,5 inch diskettes, de hardware- 
eisen zijn: minimaal 128 KB Mapper- 
RAM, 128 KB VRAM, één 3,5 inch dri¬ 
ve en een 80-koloms monitor. CP/M 
Plus voor MSX2 kost 198 DM en is te 
bestellen bij RVS Datentechnik, 
HeinbuchenstraGe 2, München, 089- 
3510071 
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PRINT-OUT 


Listingrubriek MSX-INFO 


We ontvangen regelmatig nieuwe programma’s voor 
deze rubriek. Wij hebben nu een paar programma’s 
ontvangen die letterlijk zijn overgenomen uit andere 
bladen. Zelfs al komen ze uit een ander wereld deel, 
het kan em mag niet. Meestal vissen wc deze program¬ 
ma’s er wel op tijd uit maar wc kunnen het niet altijd 
voorkomen. Denk erom dat u altijd zelf verantwoor¬ 
delijk delijkbent voor de orginaliteit van uw inzending. 
Eigen gemaakte programma’s kunnen we natuurlijk al¬ 
tijd gebruiken. Een daarmee kunt u een leuk zakcent - 
je verdienen. Inzendingen naar Uitgeverij SAC Pos¬ 
tbus 112 in Blaricum. Vergeet u niet een zo duidelijk 
mogelijke uitleg er bij te doen ? 


Inhoud listingdeel 


In het listingdeel, vindt u: 


Listing tester 

28 

Mindyour mind 

29 

Suptek 

33 

MSX-Turbo-Saver 

37 

Klok 

38 

Speed-trap 

40 

Shootingstar 

42 


Rob Goudriaan. 


LISTING TESTER 



63000 

REM ***** list tester ***** 

63290 PGM=WIJ ZER 

s PUNT=WIJZER+2 



6301O 

REM (C) 1985 Jan Bodzinga 

63300 A$=INKEY*sIFA*< CHR*(32)THEN63150 


63020 

REM 

63310 PRINT" 



RETURN = verder 



63030 

REM saven als ASCII file 

63320 A*=INKEYS: 

IF A$=CHR$(13)THEN 63 



63040 

REM ’SAVE "CAS;LISTTEST",A * 

150 







63050 

REM te testen programma laden 

63330 G0T063 

320 






63060 

REM merge "1isttest" 

63340 REM einde 

check, v o o r zelftest 



63O70 

REM run 63000 

63180 eruit 







63075 

REM *********************** 

63350 REM lijst 

op papier overal LPRI 



63080 

REM *** BEGIN PROGRAMMA *** 

NT ipv PRINT 







63085 

REM *********************** 

63360 PRINT 







63090 

CLS:PR I NT"Spatiebalk = pauze" 

63370 PRINT 

USING"Totaal telling;#### 



63100 

PRINT:PRINT"LISTTEST:" 

##"5 TSOM 







63110 

START=32768! 

63380 END 







63120 

PGM=START+1 

r eg el :63000 

_ 

0 

regel 

:6320O - 

1 89 


63130 

PUNT=START+3 

regel :63010 

_ 

0 

regel 

:63210 

• 96 


63140 

TSOM=0 

regel :63020 

_ 

0 

regel 

:63220 - 

185 


63150 

WIJZER=PEEK(PGM)+PEEK(PGM+1)*25 

regel :63030 

_ 

0 

regel 

:63230 - 

202 


6 


regel :63040 

_ 

0 

regel 

-.63240 - 

« 151 


63160 

IF WI JZER=0 THEN 63340 

regel :63050 

_ 

0 

regel 

s63250 

103 


63170 

REGEL—PEEK(PUNT)+ PEEK(PUNT+1)*2 

regel :63O60 

_ 

0 

regel 

s63260 - 

131 


56 


regel :63070 

_ 

0 

regel 

:63270 - 

85 


63180 

IF REGEL>62999!THEN 63340 

regel :63075 

_ 

0 

regel 

:63280 

* 24 


63190 

SGM=0 

r eg e1 :63080 

_ 

0 

regel 

:63290 

253 


63200 

FORI=PUNT+2 TO WIJZER-1 

regel :63085 

— 

0 

regel 

:63300 

• 56 


63210 

A=PEEK<I) 

regel :63090 

- 

16 

regel 

:63310 

122 


63220 

I FA=0THENI =WIJZER 

regel :63100 

- 

86 

regel 

:63320 - - 

231 


63230 

IFA=143THENI=WIJZER:G0T06326 

regel :63110 

- . 

7 

r eg e 1 

s 63330 

230 


0 


regel s 63120 

- 

100 

regel 

;63340 - 

0 


63240 

IF A=32THEN63260 

regel s 63130 

- 

201 

regel 

:63350 

0 


63250 

SOM=(SOM+A)M0D256 

regel :63140 

- 

67 

regel 

563360 

« 157 


63260 

NEXT 

regel t 63150 

- 

99 

regel 

:63370 >- 

' 163 


63270 

TS0M=TS0M+S0M 

regel :63160 


177 

régel 

s63380 - 

129 


63280 

PRINT USING "regel :##### 

regel :63170 

— 

189 




V 

###";REGEL,SOM 

regel :63190 

— 

239 

Totaal tel 1ing x 

368 8^y 
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MIND YOUR MIND 


Met dit programma van Ralpli Kersten uit Zoelcrmeer 
heeft u de beschikking over 6 verschillende spelletjes, 
waarbij het geheugen een grote rol speelt. Minimind— 
Mastermind--Suppermind—Megamind--Makc-your 
mind, na hel runnen van dit programma hebben ze 
geen problemen meer voor u. Er is een duidelijke uit¬ 
leg in het programma opgenomen. Dit programma is 
een voorbeeld van gebruikers vriendelijkheid. 


REM 

REM 

REM 

REM 

REM 

REM 


"MIND YOUR MIND" 

door RALPH KERSTEN 
uit ZOETERMEER 


8 nei 1986 

8 REM 

100 'PIJL N ONDER (191) ? = CODE 3 
102 'RONDJE WIT (199) G = GRAPH D 
104 'RONDJE ZWART (200) H = GRAPH L 
106 SCREEN 1:KEYOFF:GOSUB 468 
108 COLOR 4,14,14:CLS 
110 WIDTH 25 

112 CLEAR 1025:DEFINT A.B.Y 
114 VPOKE 8217.30 
116 VPOKE 8216.254 
118 VPOKE 8215,142 
120 FOR A=0TO7:READ A$ 

122 VPOKE A+1600,VAL("4H"+A$) 

124 VPOKE A+1592,VAL("iH"+A$) 

126 NEXT 

128 FOR A=0TO7:READ A$ 

130 VPOKE A+1528,VAL(”&H”+A$) 

132 NEXT 

134 ON ERROR GOTO 526 
136 ON STOP GOSUB 536:STOP ON 
138 FOR A=1TO10:KEYA,"":NEXT 
140 DEFUSR 0=&H3E 
142 KK$(1)="123456” 

144 KK$(2)="123456" 

146 KK$(3)="ABCDEFGHIJKLMNOPQRSTUVWXYZ" 

148 KK$(4)="ABCDEFGHIJKLMNOPORSTUVWXYZ1234567890" 
150 'MENU 
152 CLS 

154 PRINT" ) MIND YOUR MIND <" 

156 L0CATE2,5:PRINT"1 Mini Bind" 

158 L0CATE2,6:PRINT"2 Master aind" 

160 L0CATE2,7:PRINT"3 Super Bind" 

162 L0CATE2,8:PRINT”4 Mega Bind" 

164 L0CATE2,9:PRINT"5 Make (up) your Bind" 

166 LOCATE2,10:PRINT"6 Informatie" 


168 SK=VAL(INKEY$):IF SK<1 OR SK>6 THEN 168 

170 IF SK=1 THEN L=3:MB=12 

172 IF SK=2 THEN L=4:MB=12 

174 IF SK=3 THEN L=4:MB=50 

176 IF SK=4 THEN L=5:MB=99 

178 IF S(<5 THEN GOSUB 186 

180 IF SK=5 THEN GOSUB 360 

182 IF SK=6 THEN GOSUB 252 

184 GOTO 150 

186 'DE HÖOFDLÜS VAN ALLE SPELEN 
188 '£££££££££££££££££££££££££££ 

190 CLS 
192 FOR A=1T0L 

194 W$(A)=MID$(KK$(SK),INT(RNDf-TIME)*LEN(KK$(SK)) 
)+l,l) 

196 IF A)1 THEN FOR B=1T0A-1 ELSE 202 
198 IF W$(B)=W$(A) THEN 194 
200 NEXT B 
202 DM$="DUMMY" 

204 BEEP:NEXT A 

206 'GETALLEN NU IN STRINGS VAN 1 KARAKT 

ER 

208 FOR A=1T0L:L0CATE A*2,0:PRINTCHR$(191):NEXT 
210 FOR A=1I0MB 
212 GOSUB 462 
214 WP=0:ZP=0 

216 Y=A+3:IF Y>22 THEN Y=23 
218 FOR B=1T0L 
220 CL=0 

222 IN$=INKEY$:IF IN$='"' THEN 222 

224 IF IN$=CHR$(27)THEN GOSUB 426:G0T0 214 

226 IF INSTRt1,KKJ(SK),IN$)>0 THEN K$(B)=IN$ ELSE 

GOSUB 468:GOSUB 476:GOTO 226 

228 LOCATE B*2,Y:PRINTIN$; 

230 PLAY"S1M2000T130L8O4C" 

232 IF PLAY(0) THEN 232 
234 GOSUB 434 
236 NEXT B 

238 LOCATE 15,Y:PRINTSTRING$iZP,200);STRING$(WP.19 
9) 

240 IF ZP=L THEN 492 
242 PLAY"S1M5000L4O5B" 

244 IF PLAY(0) THEN 244 
246 NEXT A 
248 GOTO 508 

250 '£££££££££££££££££££££££££££ 

252 'INFORMATIE 

254 CLS:PRINT"Dit prograBaa bevat vier variaties o 
p het bekende spel ”;CHR$(34):"Master Bind":CHR$(3 
4);"." 

256 PRINT:PRINT"Te weten:":PRINT 
258 PRINT” Mini Bind" 

260 PRINT" Master aind" 
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262 PRINT" Super Bind" 


340 PRINT .- PRINT .-PRINFHet doel van het spel is in 

264 PRINT" Mega iind" 


zo weinig logelijk beurten de code te breken" 

266 PRINT:PRINT"Nu volgt van elke varia- tie een b 


342 GOSUB 354 

eschrijving...." 


344 LOCATE 6,8.-PRINT"Veel plezier" 

268 GOSUB 354 


346 L0CATE11,10 .- PRINFen" 

270 PRINT"Voor alle variaties geldt echter:" 


348 L0CATE9.12.-PRINT"Succes" 

272 PRINT:PRINT"- De coaputer verzint de ”;CHH$( 


350 GOSUB 354 

34);"kleurconbinaties";CHR$(34 ) 


352 RETURN 

274 PRINT"- Als de ";CHR$(34):"kleur",-CHR$(34) ; " e 


354 LOCATE 15,22.-PRINT"[T0ETS]" 

n de positie goed zijn wordt dit aangegeven a 


356 IN$=INKEY$:IF IN$="" THEN 356 

et een zwarte pin" 


358 CLS:RETURN 

276 PRINT"- Een witte pin geeft een dat alleen de 


360 'INVOER MAKE (UP) YOUR MIND 

": CHR$ ( 34 );" kleur ” ;CHR$ ( 34 );” goed is" 


362 IF KK$(5)="”THEN 374 

278 PRINT"- <ESC> wist alle karak- ters in de be 


364 CLS 

urt waar- aan begonnen is" 


366. PRINT:PRINT"Er zijn reeds gegevens gedefinie 

280 PRINT"- Kleuren zijn, afhanke- lijk van de v 


erd. Moeten dezebehouden blijven ?" 

ariatie, vervangen door een aan- tal karakters 


368 IN$=INKEY$ : IF IN$=""THEN 368 

M 


370 IF IN$=”J"0R IN$="j" THEN 186 

282 PRINT"- Dit prograaaa werkt niet set een 


372 IF IN$o"N" AND INto'V THEN 368 

puntentel- ling” 


374 CLS:KK$(5)='"' 

284 GOSUB 354 


376 PRINT”MAKE (UP) YOUR MIND" 

286 PRINFMINI MIND":PRINT 


378 PRINT .-PRINT’Tnvoeren gegevens" 

288 PRINT”kleuren : cijfers 1-6" 


380 PRINT .-PRINT” 1234567890-=” 

290 PRINFbeurten : 12 


382 PRINT" QWERTYUIOPn" 

292 PRINT'posities: 3 


384 PRINT" ASDFGHJKL; ’ 

294 GOSUB 354 


386 PRINT" ZXCVBNM,. A" 

296 PRINFMASTER MIND".-PRINT 


388 TB$="1234567890-=\ONERTYUIOP [] ASDFGHJKL ;" ZXCV 

298 PRINFkleuren : cijfers 1-6" 


BNM, ./" 

300 PRINT"beurten : 12 


390 PRINT:PRINT"(nb: op goldstar zit de ";CH 

302 PRINT"posities: 4 


R$(34);"\";CHR$(34);" naast de ";CHR$(34);"=";CHR$ 

304 GOSUB 354 


(34);")" 

306 PRINFSUPER MIND":PRINT 


392 PRINT:PRINT"A1 deze karakters kunnen gebruikt 

308 PRINT"kleuren : letters A-Z” 


worden" 

310 PRINT"beurten : 50 


394 PRINT .-PRINFToets de karakters die u wilt gebr 

312 PRINT"posities: 4 


uiken laar in. De <BS> kan gebruikt wor-den ob he 

314 GOSUB 354 


t laatste karak-ter te wissen." 

316 PRINFMEGA MIND":PRINT 


396 PRINT"<ESC> of <RET> = verder" 

318 PRINFkleuren : A-Z en 0-9" 


398 IN$=INKEY$:IF IN$=""THEN 398 

320 PRINFbeurten : 99 


400 IF IN$=CHR$(27) OR IN$=CHR$(13) THEN 410 

322 PRINFposities: 5 


402 IF INi=CHR${8) THEN GOSUB 484 

324 GOSUB 354 


404 IF INSTR(1,TB$.IN$)>0 THEN KK$(5)=KK$(5)+IN$ 

326 PRINFMAKE (UP) YOUR MIND":PRINT 


406 LOCATE 0,22;PRINTKK$(5);" "; 

328 PRINT"Deze variant laat U de gebruikte karak 


408 GOTO 398 

ters. het laxiiua aantal beurten enhet aantal posi 


410 SK=5:CLS 

ties zelf bepalen." 


412 PRINTKK$(SK) 

330 GOSUB 354 


414 PRINT:PRINT"Wat is het laxinui aantalbeurten ( 

332 PRINFEn houdt rekening net de officiële spel 


2-99)" 

regels:":PRINT 


416 INPUT MB:IF MB<2 OR MB>99 THEN 416 

334 PRINT"- ":CHR$(200);": kleur & plaats goed" 


418 PRINT .-PRINT"Hoeveel " ;CHR$ (34); "kleuren" ;CHR${ 

336 PRINT"- ",-CHR$(199)alleen kleur goed" 


34);" in de code (2-6)" 

338 PRINT"- De stippen geven alleen aan HOEVEEL, 


420 INPUT L:IF L<2 OR L>6 THEN 420 

niet welke ";CHR$(34);”kleuren";CHR$i34) ; " goed z 


422 GOTO 186 

ijn" 

- 

424 'LOSSE SUBROUTINES 
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426 'REGEL MISSEN 

428 LOCATE 0,Y:PRINTSPACE$(24); 

430 GOSUB 464 
432 RETURN 

434 'AANTAL W/Z PUNTEN 
436 WP=0:ZP=0 
438 FOR C=1TOL:Z=0:W=0 
440 T$=H$(C) 

442 FOR D=1T0L 

444 IF K$(D)=T$ THEN GOSUB 456 
446 NEXT D 

448 IF H+Z>1 THEN END 
450 WP=HP+W:ZP=ZP+Z 
452 NEXT C 
454 RETURN 

456 IF C=D THEN Z=1:H=0 
458 IF C< >D AND Z=0 THEN M=1 
460 RETURN 

462 'AANTAL BEURTEN AANGEVEN 
464 LOCATE 15.0:PRINTUSING’’££";A 
466 RETURN 

468 'ZET CAPS-LOCK AAN 
470 POKE64683!,255 
472 OUT 170,INP(170) AND 191 
474 RETURN 

476 'ASCII CODE VERLAGEN 

478 CL=CL+1:IF CL>=2 THEN RETURN 220 

480 IF ASC(IN$)>96 AND ASC(IN$)<123 THEN IN$=CHR$( 

ASC(IN$)-32) 

482 RETURN 

484 'MIS LAATSTE KAR. VAN KK$(5) 

486 IF LEN(RK${5))=0 THEN RETURN 
488 KK$(5)=LEFT$(KK$(5),LEN(KK$(5))-l) 

490 RETURN 
492 'GERADEN 

494 LOCATE 0,0:PRINTSPACEJ{25} 

496 LOCATE 0,1:PRINTSPACE$(7);"GERADEN!!!";SPACE${ 
7) 

498 LOCATE 0,2:PRINTSPACES(25) 

500 PLAY”S13M500T150O6L8FDO5A+FGFDR8L16FFR32FL8GAA 
+R801C” 

502 IF PLAY{0) THEN 502 
504 LOCATE 17,22:PRINT"[T0ETS]" 

506 IN$=INKEY$:IF IN$="” THEN 506 ELSE RETURN 
508 'NIET GERADEN 

510 IF Y>22 THEN PRINT .-PRINT: PRINT: PRINT: PRINT 
512 LOCATE 0,20:FOR A=1T0L:PRINTM$(A) ; " .-NEXT 
514 PLAY"S13H150T200L16O3ABO4DL4BGR16L16O3ABO4DL4B 
G" 

516 IF PLAY(0) THEN 516 
518 LOCATE 15.22:PRINT"[TOETSl" 

520 IN$=INKEY$:IF IN$="”THEN 520 ELSE RETURN 
522 DATA 00,18,3C,7E,7E,3C,18,00 


524 DATA 18,18,18,18.FF,7E,3C.18 
526 'FOUTAFHANDELING 
528 SCREEN 0:KEYON 
530 X=USR(0) 

532 COLOR 15,4,4:CLS 
534 ON ERROR GOTO 0 
536 'BREAK 
538 SCREEN 0:KEYON 
540 X=USR(0) 

542 COLOR 15,4,4:CLS 
544 END 
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23 
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56 
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288 
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65 
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- 

69 
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- 

41 
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292 

- 

144 
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398 

- 

192 
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294 

- 

254 
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400 

- 

107 
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296 

- 

148 
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402 

- 

142 
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298 


127 

regel : 

404 

- 

86 
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300 

- 

69 
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406 

- 

224 
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302 

- 

145 

regel : 

408 

- 

38 
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304 

- 

254 
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410 

- 

124 
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306 

- 

87 
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- 

58 
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308 

- 

208 
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414 

- 
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310 


71 
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416 

- 

218 
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312 

- 

145 
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418 

- 

33 
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314 

- 

254 
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420 

- 

186 
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316 

- 

226 

regel : 

422 

- 

81 

regel : 

318 

- 

54 
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424 

- 

58 

regel : 

320 

- 

84 

regel : 

426 

- 

58 
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146 
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428 

- 

132 
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430 

- 
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326 

- 

43 

regel : 

432 

- 

142 
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328 

- 

24 
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434 

- 

58 

regel 
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- 

254 

regel : 

436 

- 

139 

regel : 

332 

- 

239 
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438 

- 

16 
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334 


32 
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440 

- 
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regel : 

336 

- 

229 

regel : 

442 

- 

236 

regel : 
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- 

82 

regel : 
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- 

52 

regel : 

340 

- 

132 
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- 

199 
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342 


254 
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448 

- 

136 

regel : 
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- 

202 

regel : 
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- 

77 
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- 

25 
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_ 

198 

regel : 
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- 
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regel : 
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- 

142 
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- 

254 
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- 

199 

regel : 
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- 

142 
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- 

114 
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- 
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466 - 
468 - 
470 - 
472 - 
474 - 
476 - 
478 - 
480 - 
482 - 
484 - 
486 - 
488 - 
490 - 
492 - 
494 - 
496 - 
498 - 
500 - 
502 - 
504 - 
506 - 


58 

232 

142 

58 

48 

222 

142 

58 

166 

163 

142 

58 

246 

53 

142 

58 

2 

7 

4 

173 

141 

159 

149 


regel : 508 - 58 

regel : 510 - 142 

regel : 512 - 170 

regel : 514 - 78 

regel : 516 - 156 

regel : 518 - 157 

regel : 520 - 164 

regel : 522 - 46 

regel : 524 - 67 

regel : 526 - 58 

regel : 528 - 113 

regel : 530 - 134 

regel : 532 - 54 

regel : 534 - 210 

regel : 536 - 58 

regel : 538 - 113 

regel : 540 - 134 

regel : 542 - 54 

regel : 544 - 129 

Totaaltelling: 27785 


Abonnement 
op dit blad? 

Bel gratis 
06-0224222 

HP Teleservice: 
elke dag tot 20.30 uur 
(ook in het weekend) 


PSKl 

IühBI 


. 
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SUPTEK 


Suplck is een (cksvcrwcrker geschreven in MSX basic 
aangevuld mei wat machinetaal routines door Henk 
Schollen uit Nijverdal. Hel programma is zowel voor 
de MSX 1 als de MSX2 geschikt. Bij een schermbrced- 
te groter dan 40 wordt op het 80 kolomsscherm over¬ 
geschakeld. Ook de eventuele drive wordt door het 
programnma herkend. Het programma werkt in een 
zogenaamde window-mode. Bij cassette gebruik kan 
ruim 20K aan tekst worden verwerkt, bij het gebruik 
van een diskdrive wordt dit wat minder. De maximale 
schermbreedte is 240. 

Sommige toetsen hebben een bepaalde funktie: 


TOETS: 

ESC 

BS 

DEL 

HOME 

INS 

SELECT 

TAB 


FUNKTFE: 

Terug naar het menu 
Back Space 

Delete 

Terug naar de beginpositie 
Jnsert (tussen voegen) 
Plaatst een return teken 
Normale tabfunkties 


CTRL + TOETS:FUNKTIE 
A Terug naar beginregel 

Een scherm naar beneden 
Een scherm omhoog 
Naar de onderste regel 
Wist de rest van de regel 
Een positie terug 
Tabfunklie 
Cursor naar beneden 
Cursor naar de beginpositie 
Beeld schoonmaken 
Return 

Teken voor esc commando’s 
Teken voor CHR$ 

Invoegen 

Wist de gehele regel + CTRL A 

Plaats een return teken 
Een scherm naar rechts 
Een scherm naar links 


B 

C 

D 

E 

H 

I 

J 

K 

L 

M 

P 

O 

R 

U 

X 

Y 

Z 


100 REM mimuiimiiiiiiH 

110 REM 1 SUPER TEKST * 
120 REM '"'ummimmm 

130 REM * H. SCH0LTEN * 
140 REM * De Genestetstr. 39 * 
150 REM * 7442 ZH NIJVERDAL * 
160 REM * versie: 06-06-1987 * 


170 REM ********************** 

180 CLEAR300,PEEK(4HFC4A)+256*PEEK(&HFC48) :0NST0PG 
OSUB390: ST0P0N : DEFINTA, C-M, 0-Y: ONERRORGOT0550 
190 KEY0FF :SCREENO,,0:LOCATE,,0:WIDTH40:G0SUB1100• 
GOT01010 

200 CLS:WIDTH40:COLOR 15,4,4 
210 REM 

220 REM INTROSCHERM 
230 REM 

240 LOCATE, ,0:CLS.•LOCA^E3,0:PRINT"* ,, ************* 

***»**,**«*,*,„„»* i» .poRP=lT02:L0CATE39,P:PR 

INT" 1 *":NEXT 

250 L0CATE39,3:PRINT"* ****************iu**»*«* 

tttt ttttlttl *»» 

260 FORP=0TO15:L0CATE39,5+P:PRINT"* *";:NEXT:F0R 

P=0TO4STEP4:LOCATE4,17+P:PRINT"******************* 
**“** 1 “*“** , **":N E XT 
270 L0CATE13,2:PRINT"SUPER-TEKST” 

280 L0CATE5,6:PRINT"-1- Tekst invoeren" 

290 L0CATE5,7:PRINT"-2- Geheugen schooniaken" 

300 L0CATE5,8:PRINT"-3- Tekst LADEN" 

310 L0CATE5,9:PRINT"-4- Tekst SAVEN" 

320 L0CATE5,10:PRINT”-5- Tekst uitprinten" 

330 L0CATE5,ll:PRINT"-6- Tekst nog een keer uitpri 
nten" 

340 L0CATE5,12:PRINT"-7- Aantal koiouen" 

350 L0CATE5,13:PRINT"-8- Verplaatsen van regels" 

360 L0CATE5,14:PRINT"-9- Stoppen" 

370 L0CATE6,19:PRINT"Maak uw keuze:";:A$=INPUT$(1) 

:A=VAL(A$):IFA>90RA<1THEN370 

380 CLS.ONAGOTO430,1500,1600,1650,1730,1750,1010 2 

090 

390 WIDTHK3:KEYON:LOCATE,,0:ONERRORGÖTO:END 
400 REM 

410 REM Tekst invoeren 
420 REM 

430 WIDTHK3:GOSUB2150.-GOT0580 
440 E=BASE(0)+K3:PÖKE&HF9B4,EAND255 
450 POKE&HF9B5,INT(E/256) 

460 L0CATE1,0, 0:PRINT"positie: "XX+1","YY+1”:locate 
:"XX-X","Y”IFF=1THENPRINT"INS "ELSEPRINTSPC(6 

470 D=USR0 (0):LOCATEXX-X,ï,1 

480 A$-INKEY$:IFA$=""THEN480ELSEA=ASC(A$):G0SUB122 
0 

490 IFA<320RA=127THEN520 
500 IFF=1THENGOSUB2020 
510 P0KEB,A:G0T077Ö 

520 H=Q:F1=0:0NAG0T062Ö,590,600,630,690,,,640,660, 

820,580,1490,560,,,500,500,650,,,610,,,570,670,680 

,200,770,880,710,820 

530 IFA=127THENIFXX(K-2THEN1260ELSE480 

540 G0T0480 
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550 IFERL=520THENRESUMENEXT:GOT0480ELSEIFERL=470TH 


910 IFXX >K1THENXX=XX-1:GOTO940 



ENRESUMENEXT:GOT0880ELSECLS:PRINT"Foutnr."ERR"in r 


920 GOTO940 



egel”ERL:END 


930 IFXX-X>K3-1 0THENQ=F IX((XX-K3)/10)+1:IFH< >QTHEN 



560 POKEB,13:XX=K1:X=0:Q=0:GÖT0820 


X=XX-K3+10:H=Q:GOT0950ELSEIFXX-X)K3-1THENW=-1:GOTO 



570 A=13:GOT0510 


930 



580 XX=K1 :X=0:YY=Q:Y=1 :H=0:0=0:GOT0950 


940 IFXX-X< 0THENQ=FI X(XX/10):X=X-10:1FXX-X < K1THEN9 



590 IF YY+44 < YMTHENYY=YY+22:H=H+22:GÖT0950ELSEIFH+2 


40 



2< YMTHENH=YM-22:YY=H+Y-1:GOT0950ELSE820 


950 Z=N+K‘H+0 , 10:GOSÜB2050 



600 IFH-22> 0THENYY=YY-22:H=H-22:GOT0950ELSEIFH> 0TH 


960 POKE4HF9B1,Z2:POKE4HF9BG,Z1 



ENYY=Y-1:H=0:GOT0950ELSE710 


970 IFA=9THENNEXTD:GOTO440ELSE440 



610 XX-K1:X=0:Q=0:GOSUB1210:GOT0690 


980 REM 



620 XX=K1:X-0:Q=0:GOT0950 


990 REM Aantal koloaaen 



630 YY=¥W-1:Y=22:H=YY-21:GOT0950 


1000 REM 



640 IFXX< K-2ANDXX >K1THENB=B-1:GOT01260ELSEIFXX=K1T 


1010 CLS:LOCATE1,10:PRINT”aantal kolomen (40,80,- 



HEN1260ELSE480 


240):? :GOSUB2160:IFA<32THEN200ELSELINEINPÜTK$:K 



650 IFF=0THENF=1:SOÜNDO,15:SOUND1,2:S0ÜND8,5:P0KE4 


=VAL(A$+K$):LOCATE1,12:INPUT"Kantlijn van:";KI:Kl= 



HFCAA,1:GOTO440ELSEIFA=18THENF=0:S0UND8,0:P0KE4HFC 


Kl-1:LOCATE1,14:PRINT"Kantlijn tot »ax.”K M :";:INPü 



AA,0:GOTO440 


TK2 



660 IFXX<K2-10THENFORD=1TOINT((XX+11)/10)‘10-XX-l: 


1020 IFKMOD40<>OORK=OORK2>KORK1<OORK1>K2-2THEN1010 



GOTO770:ELSEA=1:G0T0770 


ELSEPOKE4HF9B2,K:POKE4HF9B3,0:POKE&HF9B6,K:POKE&HF 



670 IFQ* 10+K3-40< K2-K3ANDXX< K2-K3THENXX=XX+K3 :X=X+ 


9B7.0: YM=I NT ((PEEK (&HFC4A) +256 * PEEK {&HFC4B) -1000-N 



K3:Q=Q+K3/1 0:W=Q: GOTO950ELSEIFQ*10 < K2-K3THENQ=Q+1: 


)/K)-l:CLS 



XX=XX+10:X=X+10:W=Q:GOTO950ELSEIFXX<K2-1 0THENXX=XX 


1030 K3=40:IFPEEK(&H2D)-0THENP0KE&HF9FF,40ELSEIFK) 



+10:GOT0950ELSE770 


40THENK3=80:P0KE&HF9FF,80 



680 IFQ‘10 >K3ANDXX >K1+K3THENXX=XX-K3:X=X-K3:Ö=Q-K3 


1040 IFPEEK(&HFFA7)< > 201THENL0CATE6,7:PRINT”Drive 



/10:W=0:G0T0950ELSEIFQ)INT(Kl/10-2)ANDQ > 0THENQ=Q- 1 


is aangesloten":S$="A:"ELSES$="CAS:":CLS 



:XX=XX-10:X=X-10:W=Q:GOT0950ELSEIFXX>K1+9THENXX=XX 


1050 IFPEEK{4HFFC6)< >250THENM=1:Ml=YM:GOSUB1520:PO 



-10:GOTO9S0ELSE880 


KE4HFFC6,250 



690 FORZ=BTON+K*YY+K2-1:POKEZ,32:NEXT:GOTO440 


1060 L0CATE5,10:PRINT"Er zijn max"YM"regels nogeli 



700 REM oahoog 


jk!": L0CAIE0 ,15:PRINT" Druk een toets!:A$ 



710 IFY=1ANDYY>0THENYY=YY-1:GOTO740 


=INP(JT$ (1): GOT0200 



720 IFY ïlANDYY> 0THEHYY= YY-1:Y=Y-1:1FY=1THEN950ELSE 


1070 REM 



740 


1080 REM INIT. MT-ADRESSEN 



730 GOTO950 


1090 REM 



740 IFY=1ANDYY>-1THENH=YY 


1100 DEFUSR0=4HF9F5:REM beeld vullen 



750 GOTO950 


1110 DEFUSR1=4HFA2B:REM geh. schoonaaken 



760 REM rechts 


1120 DEFUSR2=4HFA18:REM DELETE routine 



770 IFXX<K3-1ANDXX<K2-1THENXX=XX+1:GOTO950 


1130 DEFUSR3=4HFA3E:REM INSERT ROUTINE 



780 IFXX>K3-2ANDXX<K2-1THENXX=XX+1:GOTO930 


1140 DEFUSR4=4HFA4F:REM VERPL. ROUTINE 



790 IFXX=K2-1ANDYY < YMTHENXX^Kl:X=0:0=0:GOTO820 


1150 GOSUB1330 



800 GOT0950 


1160 Y-1:N=40500!:POKE4HF9BO,0:POKE4HF9B1,4H9A 



810 REM oalaag 


1170 RETURN 



820 IFY=22ANDYY< YM-1THENYY-YY+1:GOTO850 


1180 DATAFC,4,4,24,64,F8,60,20 



830 IFY<22ANDYY<YMTHENY'Y=YY’+1 :Y=Y+1 :GOTO850 


1190 REM 



840 GOTO950 


1200 REM Geheugenlocatie berekenen 



850 IFY=22ANDYY< YMTHENH=YY-21 


1210 REM 



860 GOTO950 


1220 B=N+K l YY+XX:RETURN 



870 REM links 


1230 REM 



880 IFXX=K1 ANDYY > 0THENXX=K2-1 :Q=INT ((XX-K3+10)/10) 


1240 REM DELETE ROUTINE AANROEPEN 



:IFO< OTHENG=0:X=0:GOTO710ELSEX=INT{XX/10+1)*10-K3: 


1250 REM 



G0T071OELSEIFXX=K1ANDYY=0THEN440 


1260 Z=B:GOSUB2Q50:POKE4HF9B8,Z1:POKE4HF9B9, 12 



890 IFXX >K1ANDX=0ANDXX< K3THENXX=XX-1:GOT0940 


1270 Z=N+K*(YY+1)-1:GOSUB2050 



900 IFXX=XTHENXX=XX-1:GOTO940 


1280 POKE4HF9BA,Z1:POKE4HF9BB,Z2 



-,---1 
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- B 

- 

^-1 

1290 Z=Z-B: GOSUB2050: P0KE&HF9BC, Z1 


)-3:LOCATE10,8:INPÜT"T/o regel :";M:POKEN-l,K:POK£ 

1300 P0KE&HF9BD,Z2 


N-2,KI:POKEN-3,K2 

1310 D=USR2(0);IFA=127THEN440ELSEIFA=8THENIFXX=K1T 


1660 L0CATE8,10:^NPUT"Naa« :A$:A$=3$+A$:L 

HEN440ELSE880 


0CATE5,12:INPUT"Snelheid (1/2):";S:IFS<>2THENS-1 

1320 REM RAH->VRAM 


1670 L0CATE7,14:PRINT"Press REC0RD/SAVE":L0CATE9.1 

1330 RESTORE1380: F0RZ=AHF9F5T04HFA5C 


6:PRINT”Druk een toets”;:B$=INPUT$(1):SCREEN,,,S:C 

1340 READS$: P0KEZ ,VAL(”&H"+S$):NEXT 


LS:LOCATE10,10:PRINT"Tekst wordt gesaved!" 

1350 RETURN 


1680 BSAVEA$,Z,N+K*M 

1360 REM MT routines 


1690 GOT0200 

1370 REM Beeld opbouw 


1700 REM 

1380 DATA3E,16,2A,B0,F9,ED,5B,B4,F9,01,28,00,C5,D5 


1710 REM Tekst printen 

,F5,E5,CD,5C I 00 I Ei,Fl,Dl,Cl,EB 1 09,EB,ED,4B,B6,F9,0 


1720 REM 

9,3D,20,E7,C9 


1730 CLS:L0CATE8,10:PRINT”printen van regel:? ";:G 

1390 REM delete routine 


OSUB2160: IFA=27THEN200ELSELINEINPUTK$: C=VAL(A$+K$) 

1400 DATAED,5B,B8,F9,ED,4B,BC,F9,62,6B,23,ED,B0,2A 


:L0CATE8,12:INPUT"printen t/« regel:":M1:IFM1>YM-1 

,BA,F9,36,20,C9 


THEN1730ELSEC=C-1:L0CATE7,14:INPÜT"Hoevaak uitprin 

1410 REM schoomaak routine 


ten:";V2:IFC< 0ORM1<CTHEN173ö 

1420 DATA3E,20,ED,4B,BE,F9,ED,5B,C0,F9,03,02,62,6B 


1740 CLS:L0CATE7,10:PRINT"(K)etting of (L)os-papie 

,ED,42,20,F8,C9 


r:";:B$=INPUT$(1):IFINSTR("KkLl",B$)-0THEN1740ELSE 

1430 REM invoeg routine 


IFB$="k"THENB$="K"ELSEIFB$='T'THENB$="L" 

1440 DATAED,4B,BE,F9,2A,C0,F9,0A,03,02,0B,0B,ED,42 


1750 FORV1=1TOV2:CLS:LOCATE8,10:PRINT"TEKST WORDT 

,20,F4,C9 


GEPRINT!!:nr. ";V1 

1450 REM verplaats routine 


1760 F0RP=CT0M1-1:LPRINTSPC(KI);:F0RS=K1T0K2-1 

1460 DATA2A,C2,F9,ED,4B,C4,F9,ED,5B,C6,F9,ED,B0 1 C9 


1770 R=PEEK(N+K*P+S) 

1470 REM 


1780 IFR=13THEN1840 

1480 REM Geheugen schoonmaken 


1790 IFR=16THEN1900 

1490 REM 


1800 IFR=17THEN1880 

1500 CLS:L0CATE10,10:PRINT"Van regelnr.:? ”;:GOSUB 


1810 IFR<32THEN1850 

2160:IFA < 32THEN200ELSELINEINPUTK$:M=VAL(A$+K$):IFM 


1820 LPRINTCHR$(R); 

>YMORM<1THEN1500 


1830 NEXTS 

1510 L0CATE10,12:INPUT"Tot regelnr.:”;M1:IFM1>YMTH 


1840 LPRINTCHR$(13) 

ENM1=YM 


1850 NEXTP 

1520 Z=N+K*(M-1)-1:GOSUB2050 


1860 IFV1=V2THEN200ELSELPRINTCHR$(13):CLS:IFB$=”L 

1530 POKE&HF9BF,Z2:POKE&HF9BE,Z1 


"THENLOCATEl,10:PRINT"Nieuw blaadie in printer.dm 

1540 B=Z+1:Z=N+K*M1-1:IFZ< BTHEN1500ELSEGOSÜB2050 


k toets";:A$=INPUT$(1) 

1550 POKE&HF9C1,Z2:PQKE&HF9CO,Z1 


1870 NEXTV1:GOT0200 

1560 D=ÜSR1(0):CLS:IFPEEK(&HFFC6)<>250THENRETURNEL 


1880 S=S+1:R=PEEK(N+K*P+S):IFR<640R8)95THEN1830 

SELOCATE10,10:PRINT"Return generen(J/N)?";:A$=INPU 


1890 LPRINTCHR$(1);CHR$(R};:GOT01880 

T${1):IFA$=”j"ORA$:"J"THINFORB=B+KlTOZSTEPK:POKEB, 


1900 S=S+1:R=PEEK(N+K*P+S):IFR=16THEN1830 

13:P0KEB+K2-K1-1,13:NEXT:GOT0200ELSE200 


1910 T=INSTR("GgHhLlSsQqVvDd0oTPECpAB1234567890",C 

1570 REM 


HR$(R)):IFT=30THENC$="CU"+CHR$(27)+"Q":GOT01950ELS 

1580 REM LOAD routine 


EIFT=31THENC$="Cu"+CHR$(8)+CHR$(27)+”E":GOT01950 

1590 REM 


1920 IFT=1THENT=14ELSEIFT=2THENT=15ELSEIFT=10THENL 

1600 CLS:LOCATE10,10:A$="":PRINT"Naai :? ";:G0SUB2 


PRINTCHR$(27);:T=34ELSEIFT=17THENT=8ELSE1940 

160:K$-"":IFA=27THEN200ELSEIFA=13THEN161ÖELSELINEI 


1930 LPRINTCHR$(T);:GOTOl900 

NPUTK$:K$=A$+K$ 


1940 RESTORE1980:F0RD=1T033:READC$:IFD=TTHEN1950EL 

1610 A$=S$+K$:LOCATE10,12:PRINT'Tress PLAY":BLOADA 


SENEXTD:GOTOl960 

$:K=PEEK(N-1):KI=PEEK(N-2):K2=PEEK(N-3):GOTOl020 


1950 LPRINTCHR$(27);C$; 

1620 REM 


1960 GOTOl900 

1630 REM SAVE routine 


1970 REM DATA voor VW0030 

1640 REM 


1980 DATA"","CS","Cs","CU","Cu"."Cl",”Ci".”!”," 

1650 CLS:LOCATE10,6:PRINT"Van regel :? ";:GOSUB216 


","CB”,"Cb","CD","Cd","X”,"Y",."N","E","Q","P"'” 

0:IFA=27THEN200ELSELINEINPUTK$:Z=N+K *(VAL(A$+K$)-1 

- 

A","B",”T10”,"T18”,"127","T36”,"T12",”T17""",” 
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wlm 




1990 REM 

2000 REM INVOEG ROUTINE 
2010 REM 

2030 zï {YY+U-2^GOSUB2050: P0KE&HF9BE, Z1: POKE&H 
F9BF,Z2:Z=B:GOSUB2050:POKE&HF9CO,Z1:P0KE&HF9C1,Z2 

2050 Z1=256MZ/Sö-INT(Z/256)):Z2=INT(Z/256):RETUR 
N 

2060 REM 

2070 REM VERPLAATS ROUTINE 

2080 REM , - , 

2090 cls:L 0CATE5,9:PRINT"verplaatsen van regels :L 
OCATE 10 , 12 :PRINT"Van regel :? ";:GOSUB2160:IFA-27T 

2100 LINEINPUTK$:P=VAL(A$+K$):LOCATE10,14:INPUT To 
t reeel •"•D-L0CAT£546:INPUr Verplaatsen naar reg 
el :";E:P-P-1:E=E-1:D=D-1:IFP< 00RD< PORE<OORE+D-P>Y 

21lff^K'P :GOSUB205Ö: P0KE&HF9C2, Z1: POKE&HF9C3, Z2 
2120 Z=R*ABStD-P+l):GOSUB2050:POKE&HF9C4,Z1:POKE&H 

2130 ' Z-N+K'E : GOSUB2050 : POKE&HF9C6 , Z1 : POKE&HF9C7, Z2 
2140 D=USR4{0)-G0T0240 

2150 WIDTHK3:RESTORE1180:E=BASE(2)+13*8:FORP=0TO7: 
READA$:VPOKEE+P,VAL("&h"+A$):NEXT:RETURN 
2160 A$=INPUT$(1):A=ASC(A$):PRINTA$;:RETURN 



regel : 340 - 
regel : 350 - 
regel : 360 - 
regel : 370 - 
regel : 380 - 
regel : 390 - 
regel : 400 - 
regel : 410 - 
regel : 420 - 
430 - 
440 - 
450 - 
460 - 
470 - 
480 - 
490 ■ 
500 
510 
520 „ 
530 
540 
550 
560 
570 


regel : 
regel : 
regel : 
regel : 
regel : 
regel : 
regel : 
regel : 
regel : 
regel ; 
regel 
regel 
regel 
regel 
regel 


136 

35 

194 

59 

245 

237 

0 

0 

0 

120 

206 

127 

94 

82 

88 

• 114 

- 50 

- 29 

- 109 

- 64 

- 120 

- 105 

- 156 

- 28 


regel : 580 - 
regel : 590 - 
regel : 600 ■ 
regel : 610 - 
regel : 620 - 
regel : 630 - 
regel : 640 - 
regel : 650 - 
regel ■■ 660 
regel : 670 - 
regel : 680 
regel : 690 
regel : 700 
regel : 710 
regel : 720 
regel : 730 
regel : 740 
regel : 750 
regel : 760 
regel : 770 
regel : 780 
regel : 790 


regel 

regel 


800 

810 


regel : 820 - 
regel : 830 - 
regel : 840 - 
regel : 850 - 
regel : 860 - 
regel : 870 - 
regel : 880 - 
regel : 890 • 
regel : 900 
regel : 910 
regel : 920 
regel : 930 
regel : 940 
regel : 950 
regel : 960 
regel : 970 
regel : 980 
regel : 990 

regel : 1000 
regel : 1010 
regel : 1020 
regel : 1030 
regel : 1040 
regel : 1050 
regel : 1060 
regel : 1070 
regel : 1080 
regel : 1090 
regel : 1100 


196 

222 

201 

80 

194 

181 

192 

181 

208 

122 

141 

53 

0 

116 

42 

■ 80 
■ 66 
- 80 
0 

- 122 
- 101 

- +- 3 

- 80 

0 

- 144 

- 107 

- 80 

- 15 

- 80 

0 

- 33 

- 180 

- 47 

- 82 

- 70 

- 227 

- 244 

- 59 

- 68 
162 

0 
0 
0 

216 
58 
96 
43 
65 
27 
0 
0 
0 

168 


regel : 1110 • 2- 
regel : 1120 - 2( 
regel : 1130 - 2 
regel : 1140 - 
regel : 1150 - 2 
regel : 1160 - 1 
regel : 1170 - 1 
regel : 1180 - • 
regel : 1190 - 
regel : 1200 - 
regel : 1210 - 
regel : 1220 - 
regel : 1230 - 
regel : 1240 - 
regel : 1250 - 
regel : 1260 - 
regel : 1270 - 
regel : 1280 * 
regel : 1290 - 
regel : 1300 - 
regel : 1310 - 
regel : 1320 - 
regel : 1330 - 
regel : 1340 - 
regel : 1350 - 14 

regel : 1360 - 

regel : 1370 - 

regel : 1380 - Ij 

regel : 1390 - 
regel : 1400 - 1 
regel : 1410 - 
regel : 1420 - 
regel : 1430 - 
regel : 1440 - 
regel : 1450 - 
regel : 1460 - 1 
regel : 1470 - 
regel : 1480 - 
regel : 1490 - 
regel : 1500 - 
regel : 1510 - 
regel : 1520 - 
regel : 1530 - 
regel : 1540 - 
regel : 1550 - 
regel : 1560 - 
regel : 1570 - 
regel : 1580 - 
regel : 1590 - 
regel : 1600 - 
regel : 1610 - 
regel : 1620 - 
regel : 1630 - 
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regel : 1640 - 0 regel : 1910 - 63 

100 F0RI=&HCFE6T0IHD08D: READA: POREI, A:NEXT 


regel : 1650 - 32 regel : 1920 - 198 

110 DATA 205,108,0,205,204,0,33,233,243,62,1,119 


regel : 1660 - 107 regel : 1930 - 86 

120 DATA 35,62,2,119,35,62,2,119,205,98,0,17,179,20 


regel : 1670 - 52 regel : 1940 - 138 

8,33,5,0,26,254,13 


regel : 1680 - 177 regel : 1950 - 138 

130 DATA 40,12,26,254,0,40,17,205,77,0,19,35,24 


regel : 1690 - 95 regel : 1960 - 10 

140 DATA 239,19,26,103,184,19,26,111,19,24,229,38,1 


regel : 1700 - 0 regel : 1970 - 0 

5,46,16,205,198,0 


regel : 1710 - 0 regel : 1980 - 220 

150 DATA 205,159,0,71,62,49,184,32,5,17,142,208 


regel : 1720 - 0 regel : 1990 - 0 

160 DATA 24,50,62,50,184,32,5,17,148,208,24,40,62,5 


regel : 1730 - 66 regel : 2000 - 0 

1,184,32,5,17,154,20 


regel : 1740 - 161 regel : 2010 - 0 

170 DATA 8,24,30,62,52,184,32,5,17,160,208,24,20 


regel : 1750 - 67 regel : 2020 - 225 

180 DATA 62,53,184,32,5,17,166,208,24,10,62,54,184, 


regel : 1760 - 201 regel : 2030 - 140 

32,197,17,162,208,24 


regel : 1770 - 57 regel : 2040 - 78 

190 DATA 0,33,6,244,26,254,0,40,12,119,19,35,24 


regel : 1780 - 7 regel : 2050 - 150 

200 DATA 246,38,10,46,0,205,108,0,17,140,209,38,2,4 


regel : 1790 - 70 regel : 2060 - 0 

6,121,26,254.0.40 


regel : 1800 - 51 regel : 2070 - 0 

210 DATA 7,205,77,0,35,19,24,244,201 


regel : 1810 - 5 regel : 2080 - 0 

220 FORI=AHD08ETOAHDOB2: READA: POREI, A: NEXT 


regel : 1820 - 16 regel : 2090 - 13 

230 DATA 60,68,26,33,23,0 


regel : 1830 - 214 regel : 2100 - 9 

240 DATA 48,57,20,28,27,0 


regel : 1840 - 159 regel : 2110 - 151 

250 DATA 35,42,13,21,32,0 


regel : 1850 - 211 regel : 2120 - 107 

260 DATA 32,39,11,20,33,0 


regel : 1860 - 57 regel : 2130 - 148 

270 DATA 26,33,08,17,35,0 


regel : 1870 - 163 regel : 2140 - 72 

280 DATA 23,31,06,15,36,0 


regel : 1880 - 27 regel : 2150 - 172 

290 FORC=4HDOB3TÖ4HD18C:READA:POKEC,A:HEXT 


regel : 1890 - 115 regel : 2160 - 71 

300 DATA 42,42,42,42,42,42,32,45,32,77,46,83 


regel : 1900 - 69 

310 DATA 46,88,46,32,84,85,82,66,79,32,45,32,42,42 


Totaaltelling: 11243 

,42,42,42,42,13,0,45 


MSX-TURBO-SAVER | 

Nico dc Wit uit Alkmaar vindt het lange wachten voor 

320 DATA 255,255,255,255,255,255,255,255,255,255 

330 DATA 255,255,255,255,255,255,255 

340 DATA 255,255,255,255,255,255,255,255,255,255 

350 DATA 255,255,13,0,168,40,99,41 

360 DATA 32,66,121,32,76,101,32,80,114,111,103,32 


zijn eigen geschreven programma’s naar cassette zijn 

370 DATA 83,112,111,114,116,105,102 


weggeschreven maar niks. Dus maakte hi j hier een pro¬ 

380 DATA 13,0,252,77,97,100,101,32,98,121,32,78 


gramma voor. U kunt nu kiezen of een programma met 

390 DATA 46,65,46,74,46,13,01,67 


1800-2100-2750-31()0-360()-40()() baud moet worden 

400 DATA 40,49,41,32,49,56,48,48,32,66,65,85,68,13, 


weggeschreven. Het programma is uit andere pro¬ 

1,107 


gramma’s op te roepen. De adressen zijn: Begin 

410 DATA 40,50,41,32,50,49,48,48,32,66,65,85,68,13, 


&HCFE6 Eind &HD18C en het startadres is 

1,147 


&HCFE6. Hel programma moet worden weggeschre¬ 

420 DATA 40,51,41,32,50,55,53,48,32,66,65,85,68,13, 


ven met BSAVE. Een loader is niet nodig want de 

1,187 


MSX stelt zelf zijn laadsnclheid in. 

430 DATA 40,52,41,32,51,49,48,48,32,66,65,85,68,13, 


lö 1 «ttlItlIItttlIIXIIIIIIIIlIIII 

1,227 

440 DATA 40,53,41,32,51,54,48,48,32,66,65,85,68,13, 


20 1 1 MSX TURBO * 

2,11 


30 ' * * 

450 DATA 40,54,41,32,52,48,48,48,32,66,65,85,68 


40 * 1 (c) By Le Prog Sportif * 

460 DATA 13,2,91,32,32,32,32,85,119,32,107,101,117, 


50 1 * * 

122,101,58,32,0,0 


60 ’ 1 Made by N.A.J. de Wit 1 

70 1 1 * 

470 DEFUSR=SHCFE6: P=USR {0) 


/ V 

80 ' iimiiiiutiftmimmtm 

regel : 10 - 58 regel . 30-58 


90 ' 

regel : 20 - 58 regel : 40-58 
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regel 

50 

_ 

58 

regel 

320 

- 40 

regel 

60 

- 

58 

regel 

330 

- 208 

regel 

70 

- 

58 

regel 

340 

- 40 

regel 

80 


58 

regel 

350 

- 94 

regel 

90 


58 

regel 

360 

- 32 

regel 

100 

- 

4 

regel 

370 

- 117 

regel 

110 

- 

240 

regel 

380 

- 212 

regel 

120 

- 

15 

regel 

390 

- 254 

regel 

130 

- 

199 

regel 

400 

- 167 

regel 

140 

- 

238 

regel 

410 

- 157 

regel 

150 

- 

219 

regel 

420 

- 155 

regel 

160 

- 

105 

regel 

430 

- 159 

regel 

170 

- 

252 

regel 

440 

- 100 

regel 

180 

- 

1% 

regel 

450 

- 237 

regel 

190 


199 

regel 

460 

- 185 

regel 

200 

- 

200 

regel 

470 

- 220 

regel 

210 

- 

181 




regel 

220 

- 

210 

Totaaltelling: 

6308 

regel 

230 

- 

151 




regel 

240 

- 

157 




regel 

250 

- 

138 




regel 

260 

- 

139 




regel 

270 

- 

150 




regel 

280 

- 

142 




regel 

290 

- 

198 




regel 

300 

- 

66 




regel 

310 


80 





it0b eS 


tellen 


ABONNEMENTEN 

OUDE NUMMERS 


Abonnementen kosten ƒ 35,- of Bfr 700 voor 
6 nummers en het is verreweg het gemakke¬ 
lijkste, wanneer u het bedrag aan ons over¬ 
maakt op giro 4922651 tn.v. SAC Blaricum/ 
MSX-Info of op onze bank in België BBL nr. 
310050602562 

OUDE NUMMERS 

Reeds verschenen nummers zijn na te bestellen. 
Maar, helaas, NIET per brief, kaart of telefonisch. 
We leveren die oude nummers alleen bij 
vooruitbetaling op onze giro 4922651. De prijs is 
ƒ 7 - per nummer (dus aangeven welk nummer). 


KLOK 


Komt dit programma u bekend voor, dat kan F.G. Wei - 
jers uit Appcltern heeft aan het programma van K. v.d 
Graaff het geluid van een oma’s klok loegevoegd. Iets 
dat we u toch niet willen onthouden. 

10 'MSX-KLOK(c)M. v/d Graaff.J2/N5. 

15 ' OMA'S SOUND f.g. weijers 1987 

20 '-initialisatie 

25 F0RI=0TO13:SOUNDI,0:NEXT 

30 S0UND7,56:S0UND8,16 

35 0NST0PG0SUB41Ö.-ST0P0N 

40 SCREENO:C0L0R3,1,1:WIDTH37 

45 DIMK(60),L(60),S(80),X{60),Y(60),X1{60),Y1(60) 

50 S=20:V=128:W=96:PI=4 X ATN(1) 

55 INPUFMIN. [0-59]";M 

60 INPUFUREN [1-12]";U: N=U 

65 U=U+(U=12) *12:U=U*5+M\12 

70 PRINT:INPUFALARM INSTELLEN? [J/N]";I$:IFI$<>"J 

"ANDI$<)”j"THENAU=12:G0T095 

75 PRINT:INPUT’’MIN. [0-59]";AM 

80 INPUTUREN [1-12]";AU 

85 AU=AU+(AU=12)*12:AU=AU l 5+AM\12 

90 ’-data inlezen + scherm 

95 B=BASE(2)+384:FORI-BTOB+79 


Computers staan op tafels 
van Projecta. 




PROJECTA 

Postbus 191 6000 AD Weert 

Tel.: 04950-35118 Telex: 37588 proje n.l. 


Wij 

geven u graag 
alle informatie. 


— 
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100 S{I-B)=VPEEK{I)ORVPEEK(I)/2 

105 NEXTI:SCREEN2,0:F0RI=ÖT079 

110 VPOKEBASE(14)+I,S(I):NEXTI 

115 FORI=80TOl19:READJ 

120 VPOKEBASE(14)+1,J:NEXTI 

125 LINE(58,26)-(198,166),6,BF 

130 LINE(52,20)-(203,172),12,B 

135 LINE(48,16)-(207,176j,12,B 

140 PAINT(49,17),12 

145 F0RI=1.5*PIT03.5*PISTEPPI/30 

150 SI=SIN(I):CO=COS(I) 

155 Y{A)=W+SI*45+.5:X(A)=V+CO*39+.5 

160 Y1(A)=W-SI*10+.5:X1(A)=V-C 0 * 9+.5 

165 L{A}=W+SI*38+.5:K{A)=V+C0*32+.5 

170 PSET(V+C0 l 42+.5,W+SI‘49+.5),1 

175 A-A+l.-NEXTI 

180 FORI= 1 T020:READX,¥.SN 
: 185 PUTSPRITEI,(X,Y),9+(I>16)*8,SN 

190 NEXTI 

*95 .— hoofdlus 

200 ONINTERVAL=50GOSÜB220 

205 IFU=AUANDM=AMTHENG0SUB395 

210 INTERVALON:GOTO205 

215 '-seconden 

220 LINE(V,W)-(X(S),Y(S )),6 

225 LINE(V,W)-(X1(S),Y1{S)),6 

230 S=S+ 1 :IFS >59TH£NS=0:GOSUB290 

235 LINE(V,W}-(X{S),Y(S )),1 

240 LINE(V,W)-(X 1 (S),Y 1 (S )),1 

245 LINE(V,W)-(X(M),Y{H )),1 

250 LINE(V,W)-{K(U),L(U )),1 

255 IFQ2=GTHENGOSUB340 

260 IFQ=lTHENGOSUB365:0=0 

265 IFBELANDBEL<N+ 1 THENBEL=BEL+ 1 :IFBEL=N+1THENQ2=0 

270 IFQ1=1ANDWEK<15THENWEK=WEK+1:IFWEK)14THEN01=0- 
Q 2=0 

275 S0UND13,Q3 

280 RETURN 

285 '-ninuten 

290 LINE(V,W)-(X(M),Y(M )),6 

295 H=M+1:IFM>59THENN=0:GOSU8355 

300 IFM)0ANDMMOD15=0THENQ2=0:GOSUB380 

305 IFMMOD12=0THENGOSUB320 

310 RETURN 

315 '. uren 

320 LINE(V,W)-(K(U),L(U )),6 

325 Ü=U+ 1 :IFÜ)59THENU=0 

330 RETURN 

335 ’-tiktak 

340 SOUNDO,0:S0UND12,1:03=0:02=1 

345 RETURN 

350 - slaat de tijd 

355 Q=1:BEL= 1 :N=N+ 1 :IFN)12THENN=1 

360 RETURN 

365 SOUNDO,39:S0ÜND12,50:Q3=0 

370 RETURN 

380 SOUNDO,53.SOÜND12,10:SOUNDO,0 

385 RETURN 

390 ..alar» 

395 SOUNDO,39:SOUND12,1:01=1:03=8 

400 AU=12:RETURN 

405 -onstop-routine 

410 SOUND 8 ,0:INTERVALOFF:COLOR 3,1,1:SCREEN0:END 

415 1 — (MSX info)-data sprites 

420 DATA 0,0,0,217,170,169,136,143 

425 DATA 0,0,0,241,10.132,74,145 

430 DATA 0,0,238,74,74,234,0,0 

435 DATA 0,0,119,69,101,71,0,0 

440 DATA 7,7,7,0,0,0,0,0 

445 '-X—Y—Sprite nu».= uur 

450 DATA 151, 42,1 :’ 1 

455 DATA 168, 64.2 :’ 2 

460 DATA 175, 92,3 :' 3 

465 DATA 169,118,4 :' 4 

470 DATA 151,142,5 :' 5 

475 DATA 126,150,6 6 

480 DATA 100,142,7 7 

485 DATA 82,118,8 8 

490 DATA 76,92,9 9 

495 DATA 78, 64,1,-85,64,0:' 10 

500 DATA 95, 42,1,102,42,1:' 11 

505 DATA 122, 34,1,129,34,2:' 12 

510 - plaats «id-stip 

515 DATA 122,94,14 

520 -~-- plaats asx info 

525 DATA 120,110,10,128,110,11,120,118,12,127 118 

13 

regel : 10 - 58 regel : 95 - 140 

regel : 15-58 regel : 100 - 112 

regel : 20-58 regel : 105 - 87 

regel 25 - 1 re gel ; 110 - 86 

regel : 30 - 177 regel : 115 - 131 

regel : 35 - 186 regel : 120 - 179 

regel : 40 - 107 regel : 125 - 142 

regel : 45 - 148 regel : 130 - 75 

regel : 50 - 28 regel : 135 - 75 

regel : 55 - 230 regel : 140 - 227 

regel : 60 - 216 regel : 145 - 45 

regel : 65 - 121 regel : 150 - 141 

regel : 70 - 76 regel 155 - 139 

regel : 75 - 242 regel : 160 - 154 

regel : 80 - 77 regel : 165 - 119 

regel : 85 - 255 regel : 170 - 141 

regel : 90 - 58 regel : 175 - 122 
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regel : 

180 

- 51 

regel 

365 - 

123 

10 BEST=100:COLOR 3,1,1 rSCREENl, .0,1 :KEY OFF:WIDTH 


regel : 

185 

- 212 

regel 

370 - 

142 

32 


regel : 

190 

- 204 

regel 

375 - 

58 

20 GOSUB 1000 


regel : 

195 

- 58 

regel 

380 - 

250 

30 LOCATE 0,10.-PRINT" abede 


regel : 

200 

- 234 

regel 

385 - 

142 

fghij 


regel : 

205 

- 38 

regel 

390 - 

58 

COPYRIGHT 1987":LOCATEO, 


regel : 

210 

- 225 

regel 

395 - 

17 

18:PRINT" PRESS BUTTON” 


regel : 

215 

- 58 

regel 

400 - 

104 

40 FOR 0=0 TO 2 


regel : 

220 

- 132 

regel 

: 405 - 

58 

50 IF STRIG(O)=-l THEN 70 


regel : 

225 

- 230 

regel 

: 410 - 

63 

60 NEXT OrGOTO 40 


regel : 

230 

- 13 

regel 

: 415 - 

58 

70 GOSUB 700 


regel : 

235 

- 127 

regel 

: 420 - 

76 

80 GOSUB 800:BALL=1 : GOSUB 700 


regel : 

240 

- 225 

regel 

: 425 - 

219 

90 X=0: BL=0 : BALL=1:B2=0 


regel : 

245 

- 115 

regel 

: 430 - 

132 

100 P-6144+66+10 


regel : 

250 

- 105 

regel 

: 435 - 

124 

110 X=0:P=INT (RND(l) l 670)+6177 


regel : 

255 

- 216 

regel 

: 440 - 

77 

120 IF VPEEK(P) < >32 THEN GOTO 110 


regel : 

260 

- 75 

regel 

: 445 - 

58 

200 REM GAME 


regel : 

265 

- 15 

regel 

: 450 - 

126 

210 FOR F=1 TO SP:NEXT F 


regel : 

270 

- 99 

regel 

: 455 - 

139 

220 IF STRIG(O) < >0 THEN BL=BL+1:B2=B2+1 : VPOKE P,4: 


regel : 

275 

- 144 

regel 

: 460 - 

139 

GOTO 240 


regel : 

280 

- 142 

regel 

: 465 - 

190 

230 VPOKE P,32 


regel : 

285 

- 58 

regel 

: 470 - 

179 

240 LET P=P+X 


regel : 

290 

- 120 

regel 

: 475 - 

181 

250 VPOKE P,33 


regel : 

295 

- 54 

regel 

: 480 - 

175 

260 IF VPEEK (P+X)=32THEN GOTO 210 


regel : 

300 

- 226 

regel 

: 485 - 

140 

270 IF RND{1)>.5 THEN 350 


regel .- 

305 

- 164 

regel 

: 490 - 

97 

300 REM CHANGE DIRECTION 


regel : 

310 

- 142 

regel 

: 495 - 

229 

310 X=32 


regel : 

315 

- 58 

regel 

: 500 - 

3 

320 IF VPEEK ( P+X ) =32 THEN 210 


regel : 

320 

- 110 

regel 

: 505 - 

54 

330 X=1 


regel : 

325 

- 29 

regel 

: 510 - 

58 

340 IF VPEEK(P+X)=32 THEN 210 


regel : 

330 

- 142 

regel 

: 515 - 

67 

350 X=-32 


regel : 

335 

- 58 

regel 

: 520 - 

58 

360 IF VPEEK (P+X) =32 THEN 210 


regel : 

340 

- 229 

regel 

: 525 - 

165 

370 X=-l 


regel : 

345 

- 142 




380 IF VPEEKiP+X) =32 THEN 210 


regel : 

350 

- 58 

Totaaltelling: 

12529 

390 X=32 


regel : 

355 

- 109 




400 IF VPEEK(P+X)=32 THEN 210 


regel : 

360 

- 142 




410 X=1 








420 IF VPEEK(P+X)=32 THEN 210 




SPEED-TRAP 



500 PLAï "s6i4000o2l4a" 








510 LET BALL=BALL+1 


Van M. Esscrs kregen we een spel dat op zich; 

zeer een- 

520 LOCATE10,22 : PRINTBL : LOCATE 27,22:PRINT(BALL AN 

voudig is. 

Een bal stuitert 

in een veld rond, de beslu - 

D BALL < 21 > 


ring van deze bal is door de speler niet tc regelen. Als 

530 IF B2)580 THEN B2=0:GOSUB 700 

dc hal cchlcr 

iels raakt, 

verandert hij van 

richting. 

540 IF BALL<=20 THEN GOTO 110 


Door op de vuurknop tc drukken, kan dc speler achter 

600 DEFUSR=4H90:DD=USR(0) 

de bal een groen blokje plaatsen. Door deze blokjes op 

610 LOCATE 8,7:PRINT"20 BALLS TRAPPED”:LOCATE 8,9: 

een bepaalde manier tc plaatsen, kan men de bal ops- 

PKINT"G A M E 0 V E R":LOCATE 10,11:PRINT"PRESS B 

luiten en 

dat is juist de bedoeling 

van dit spel. Men j 

UTTON" 

moet 20 ballen 

opsluiten, zodat ze geen kant 

meer op- 

620 IF BEST)BL THEN BEST=BL 

kunnen. Dit lijkt simpel, dat is hel 

in feite ook, maar 

625 LOCATE 11,14:PRINT”Y0U :";BL:L0CATE 11,15:PRIN 

het is wel de bedoeling dal er zo weinig mogeli jk blok - 

T"BEST:";BEST" 

jes gebruikt worden. Het spel bestaal uit drie levels. 

630 GOSUB 1310 

Een snel i 

reaktievermogen 

is bij dit 

spel zeer 

handig. 

640 LOCATE 0,22:PRINT" BLOCKS :";BL:L0CATE 20,22: 


40 
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PRINFBEST :";BEST 
650 FOR F=1 TO 150.-NEXT F 
660 LOCATE 0,22:PRINT" 

tl 

670 FOR F=1 TO 150:NEXT F 
680 IF STRIG(0)=0 THEN 640 

690 GOSUB 700:GOSUB80ö: BL=0 :BALL-1:GOSUB700•GOTO 9 
0 

700 LOCATE 0,0:PRINT”(((((({{({{((((((( C (( (( ( {(f (( 
FOR F=1 TO 20: PRINT" ( 

(";:NEXT:PRINT"(({(((((({(({({((({(({(((({( 

(((( BLOCKS : 0 BALL : 1 " 

710 LOCATE10,22:PRINTBL:LOCATE 27,22:PRINT(BALL AN 
D BALL<21) 

720 RETURN 

800 LOCATE 7,3:PRINT"S P E E D TRA P":L0CATE 6 
4.-PRINT"_« 

810 LOCATE 5,6:PRINT”A BALL’bOUNCES AROUND":LOCATE 
5,7:PRINT"THE SCREEN AND YOU MUST".-LOCATE 5,8:PRI 
NTTRAP IT USING AS FEW".-LOCATE 5,9:PRINT"BL0CKS A 
S POSSIBLEp" 

820 LOCATE 5,11:PRINT”PRESSING THE BUTTON".LOCATE 
5,12:PRINT"WILL PLACE A BLOCK":LOCATE 5,13:PRINT"B 
EHIND THE BALLp ONCE":LOCATE 5.14:PRINT"A BALL HAS 
BEEN TRAPPED":LOCATE 5,15:PRINT"AN0THER WILL APPE 
ARp" 

830 LOCATE 5,16:PRINT"YOU MUST TRAP 20 BALLSp”-LOC 
ATE 10,18:PRINT”SPEED 1 2 3" 

840 GOSUB 1300 
850 Y=16 

860 S=STICK(0) :LOCATE Y,18:PRINT" ":FOR N=1 TO 50- 
NEXT N 

870 IF S=3 AND Y<20 THEN Y=Y+2 

880 IF S-7 AND Y)16 THEN Y=Y-2 

890 IF STRIG(O)=0 THEN LOCATE 16,18:PRINT"1 2 3"-F 

OR N=1 TO 50: NEXT N.-GOTO 860 

900 RN=RND(-TIME) 

910 IF Y=16 THEN SP=50 
920 IF ï=18 THEN SP=25 
930 IF Y=20 THEN SP=0 
940 RETURN 

1000 LOCATE 0,5:PRINT" ONE MOMENT PLEASE 

MAKING 

GRAPHICS" 

1010 RESTORE 1200:B=264:E=271:GOSUB 1190 

1020 B=320:E=327:GOSUB 1190 

1030 RESTORE 1220:B=776:E=855.-GOSUB 1190 

1040 RESTORE 1240:B=896:E=903:GOSUB 1190 

1050 VPOKE 8196,224:VPOKE 8192,32:VPOK£ 8197,138 

1060 B=384.-E=463: GOSUB 1080 

1070 B=520:E=727:GOSUB 1080:RETURN 

1080 FOR F=B TO E 

1090 A=VPEEK(F):A=A/2 


1100 IF A>=1 THEN VPOKE F,(A+2) 

1110 IF A>=2 THEN VPOKE F,(A+4) 

1120 IF A>=4 THEN VPOKE F,(A+8) 

1130 IF A)=8 THEN VPOKE F,{A+16) 

1140 IF A»=16 THEN VPOKE F,(A+32) 

1150 IF A>=32 THEN VPOKE F,(A+64) 

1160 IF A>=64 THEN VPOKE F,(A+128) 

1170 IF A>=128 THEN VPOKE F,(A) 

1180 NEXT F:RETURN 

1190 FOR F=B TO E: READ A:VPOKE F,A:NEXT F.RETURN 
1200 DATA 60,102,251.253,253,255,126,60 
1210 DATA 251,251,251,0,191,191,191.0 
1220 DATA1,3,6,12,12,6,3,1,195,99,51,27,27,51,99,1 

95,249,51,102,204,204,102,51,25,224,0,0,0,1,3,6,23 
6,24,56,120,216,248,24,24,24,0,14,8,14,2,14,0,0,0. 
238,168,172,168,232,0,0,0,234,74,74,74,79,0,0 
1230 DATAO,187,170,187,171,42,0,0,0,184,160,176,32 
> 184 ,0,0,0,0,0,255,0,0,0,0,33,98,34,33,32,32,34,24 
9,199,40,40,231,40,40,40,199.28,162,160,60,162,162 
,162,28 

1240 DATA 0,0,0,0,0,48,48,0 

1300 PLAY"V904L8EDCDEFGGDDEFCEDCDV8DV7DV6DV5DV4DV3 

D","V903L8EDCDEFGGDDEFCEDCDV8DV7DV6DV5DV4DV3D","V9 

05L8EDCDEFGGDDEFCEDCDV8DV7DV6DV5DV4DV3D":GOTO 1320 

1310 PLAY"04L8V9FBAFEFDECDDV8DV7DV6DV5DV4DV3D","05 

L8V9FBAFEFDECDDV8DV7DV6DV5DV4DV3D","03L8V9FBAFEFDE 

CDDV8DV7DV6DV5DV4DV3D 

1320 IF PLAY(0)=-1 THEN GOTO 1320 

1330 RETURN 


regel .- 
regel : 
regel : 
regel .- 
regel .- 
regel : 
regel .- 
regel .- 
regel : 
regel : 
regel : 
regel : 
regel : 
regel .- 
regel .- 


regel 

regel 

regel 

regel 

regel 


10 - 

169 

regel 

: 330 - 

89 

20 - 

134 

regel 

: 340 - 

196 

30 - 

174 

regel 

: 350 - 

72 

40 - 

189 

regel 

: 360 - 

196 

50 - 

238 

regel : 

: 370 - 

75 

60 - 

203 

regel : 

: 380 - 

196 

70 - 

89 

regel : 

: 390 - 

86 

80 - 

135 

regel .- 

400 - 

196 

90 - 

36 

regel : 

410 - 

89 

100 - 

91 

regel : 

420 - 

196 

110 - 

133 

regel : 

500 - 

129 

120 - 

143 

regel : 

510 - 

176 

200 - 

0 

regel .- 

520 - 

132 

210 - 

72 

regel .- 

530 - 

48 

220 - 

10 

regel : 

540 - 

135 

230 - 

81 

regel .- 

600 - 

255 

240 - 

96 

regel .- 

610 - 

227 

250 - 

114 

regel : 

620 - 

186 

260 - 

77 

regel : 

625 - 

194 

270 - 

16 

regel : 

630 - 

190 

300 - 

0 

regel .- 

640 - 

112 

310 - 

86 

regel : 

650 - 

74 

320 - 

196 

regel : 

660 - 

73 
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regel 

670 

- 

74 

regel 

1060 - 

57 

150 KEY(l) 0H:KEY(2) ON 

regel 

680 

- 

55 

regel 

1070 - 

147 

160 GOTO 160 

regel 

690 

- 

13 

regel 

1080 - 

23 

170 REM iffiNU***”****!****!*** 

regel 

700 

- 

131 

regel 

1090 - 

16 

180 CLS:SCREEN 1 

regel 

710 

- 

132 

regel 

1100 - 

99 

190 HIDTH 26 

regel 

720 

- 

142 

regel 

1110 - 

102 

200 LOCATE 8,1 

regel 

800 

- 

204 

regel 

1120 - 

108 

210 PRINT”====== MENU 

regel 

810 

- 

149 

regel 

1130 - 

118 

n 

regel 

820 

- 

193 

regel 

1140 - 

108 

220 LOCATE 0,7 

regel 

830 

- 

147 

regel 

1150 - 

156 

230 PRINT1) GROOTTE: KLEIN = 2 GRO 

regel : 

: 840 

- 

180 

regel : 

: 1160 - 

28 

OT = 1" 

regel : 

850 

- 

103 

regel : 

: 1170 - 

220 

240 LOCATE 0,11 

regel : 

: 860 

- 

122 

regel ; 

; 1180 - 

145 

250 PRINT2) SNELHEID: TRAAG = 1 GE 

regel : 

870 

- 

194 

regel ; 

; 1190 - 

151 

HOON = 2 SNEL = 3 Z 

regel : 

880 

- 

193 

regel : 

; 1200 - 

24 

EER SNEL = 4" 

regel : 

: 890 

- 

240 

regel 

: 1210 - 

177 

260 LOCATE 0,19 

regel : 

: 900 

- 

36 

regel 

: 1220 - 

255 

270 PRINTTYP HIER ÜH KEUZE IN: 1) 

regel 

: 910 

- 

159 

regel 

: 1230 - 

200 

2)":INPUT AX: INPUT BI 

regel 

: 920 


136 

regel 

: 1240 - 

176 

280 REST0M:G0T0 400 

regel 

: 930 

- 

115 

regel 

: 1300 - 

233 

290 REM UITLEG**************** 

regel : 

: 940 

- 

142 

regel 

: 1310 - 

230 

300 HIDTH 22:L0CATE 5,2.-PRINTEERSTE RONDE 

regel : 

: 1000 


174 

regel 

: 1320 - 

63 

n 

regel : 

1010 

- 

247 

regel 

: 1330 - 

142 

310 LOCATE ,6:PRINT"HET IS EEN SPEL BAARBIJ ER PROJ 

regel : 

1020 

- 

223 




ECTIELHi.VAN RECHTS NAAR LINKS EN OMGEKEERD,VLIEGEN 

regel : 

: 1030 

- 

87 

Totaaltelling: 

12421 

DIE JE MOET KUNNEN KAPOT SCHIETEN MET BEHULP VAN" 

regel : 

1040 

" 

19 




320 LOCATE 21,11:PRINT" DE SPATIE-BALK.JE KAN DE GR 

regel : 

1050 

- 

29 




OOTTE EN DE SNELHEID VAN DE PROJECTIELEN ZELF KIEZE 


SHOOTING STAR 


Shooting star is een spel waarbij projektielen van bei - 
de zijden over het beeldscherm vliegen. Er staat een 
kanon op het onderste gedeelte van het scherm, deze 
is niet te verplaatsen. Door op de spatiebalk te druk - 
ken kunt u vuren, het valt niet mee om met een hoge - 
re snelheid de projektielen te raken. De snelheid en de 
grootte van de projektielen is zelf in te stellen. Dit spel 
is gemaakt door Theo Nuyttens uil Kortrijk in Belgie. 

10 MM TITEL* 1 **»”************?****!* 

20 COLOR 8,1,1 
30 SCREEN 3 

40 OPEN'GRP:" FOB OUTPUT AS#1 
50 PRESET(14,3Ö) 

60 PRINT#1,"Shooting" 

70 PRESET(75,110) 

80 PBINTIl,"Star" 

90 FOB A=1 TO 2000:NEXT 
100 COLOB 15,1,1 
110 KEY OFF 
120 SCHEEN lrWIDTH 22 

130 LQCAIE 0,11:PRINT"HIL JE UITLEG F1 OF F2” 

140 (Ni KEY GOSUB 300,180 


N." 

330 FOB A=1 TO 8000:NEXT 
340 CLS 

350 L0CATE 4,2:PRINT"TWEEDE RONDE 


360 LOCATE ,6:PBINT"NU VALLEN DE PROJECTIELEN VAN B 
OVEN NAAR BENEDEN.JE KAN MET BEHULPVAN DE PIJLTJES 
NAAR LINKS" 

370 LOCATE 5,10:PRINT"EN RECHTS GAAN ENMET DE SPATI 
E-BALK SCHIETEN.DE GROOTTE Hl DE SNELHEID VAN DE PR 
OJECTIELEN IS DEZELFDE ALS IN DE EERSTE RONDE." 

380 FOR K=1 TO 8000:NECT KrGOTO 1930 
390 REM OPSTELLEN SPEELSCHERM* 

400 SCREEN 2.AZ 
410 INTERVAL OFF 
420 C0L0R 13,1,1 
430 KEY OFF:S=0:N=5 

440 PRESETflO, 170) .PRINT fl,"XH W HWWHW^^ 

fiïïiiniT u (yv\nr # iit rw\DI7. TXJtOJUUULBJ 

WWfllnWWI wlAmfi. til kAAm£. /«WHWHWHWH 

H HHHHWHHHHWWHHHHWHHHHt" 

450 LINE{68,178)-{120,186),1,BF 
460 S=0 

470 DRAW"BM68,178":PRINTIl,S 

480 LINE(198,178)-(250,186),1,BF 

490 DRAH"BH198,178":PRINT#1,T 

500 PRESET{47,70):PRINT#!,"JE START MET 5 MINUTEN” 
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510 PRESET (40,100): PRINTfl , "DUH OP F1 OH TE BEGINNE 


1020 NEXT C 

N":F0R A=1 TO 200:NEXT 


1030 PUT SPRITE 2,(1-3,209),2,2 

520 ON REY GOSUB 550 


1040 J=0 

530 KEY(l) ON 


1050 GOTO 850 

540 LINE{40,100)-(230,108),1,BF:FOR A=1 TO 200.-NEXT 


1060 REM EXPLOSIE EN SCORE"** 

:GOTO 510 


1070 PUT SPRITE 2,(1-3,209),2,2 

qcn REM IWETNTEREM CpDTTFCftif 



"v Dfifl i/fifJJfXRnrJI ejiKl 1 


1080 PUT SPRITE 3,(C,209),8,3 

560 LINE(47,70)-(230,78),1,BF 


1090 LINE(68,178)-(120,186),1,BF 

570 LINE(40,100)-{230,108),1,BF 


1100 S=S+V*10 

580 DATA 0,24,24,24,60,126,255,255 


1110 DRAWBH68,178” : PRINTfl, S 

590 DATA 0,0,0,0,3,3,3,3 


1120 IF S>3000 AND S<3160 THEN G=1000:S=S+G:G0IO 21 

600 DATA 56,124,254,254,254,124,56,0 


90 

610 DATA 56,124,254,254,254,124,56,0 


1130 IF S)10000 AND S<10160 THEN G=2000:S=S+G:G0TO 

620 A$= nn 


2190 

630 B$=”" 


1140 IF S>30000 AND S<30160 THEN G=5000:S=S+G:GOTO 

640 C$="” 


2190 

650 D$="" 


1150 F0fiV=l TO 15.-PUT SPRITE 4, (1-3, J) ,V,4:FïMW=l T 

660 FOR K=1 TO 8 


0 20:NEXT M.-NEXT V 

670 READ A :A4-A$+CHR$ ( A } 


1160 PUT SPRITE 4,(1-3,209),10,4 

680 NEXT R 


1170 GOTO 850 

690 FOR R=1 TO 8 


11 AA PPM VDI /IPMTlF D/WTiff* * ttttZ 



11 DU KJLn VUlAjlüJWfi KURUfi 

700 READ B:B$=B$+01Ri(B} 


1190 STRIG(O) OFF:PRESET(30,80):PLAY"V13L64CDEFGABB 

710 NEXT R 


AGFEDCL2B":PRINT#1,"OP NAAR DE VOLGENDE RONDE":FOR 

720 FOR K=1 TO 8 


A=1 TO 1500.NEXT A 

730 READ C:C*=C*+CHR$(C) 


1200 m OPSTELLEN SPEELSCHERM 

740 NEXT R 


1210 CLS 

750 FOR K=1 TO 8 



760 READ D:D$=D$+CHR$(D) 


lEiMHiwiiu (ww)p. ij? C/WOV. 7UUUUUUU 

nVRfVnVHnlSl ilvvuJLa) Hl ^vUrli » uHHBrllVHrv 

770 NEXT K 



780 SPRITE$(1)=A$ 


i230 LDffi(68,Ï78)-(12(),186),l,BF 

790 SPRITE$(2)=3$ 





1240 S=S 

800 SPRITE$(3)=C$ 


1250 DRAW"BH68,178":PRINT#1,S 

810 SPRIT£*(4)=D$ 


1 I TITC /10fl 1 70 \ t OCA 1 QC. \ 1 DP 



12WJ LlilBliyOjl/öj-lzbü^oD) ,1,1» 

820 REM HOOFDPROGRAMtó******** 


1270 DRAH"BM198,178":PRINT#1,T 

830 ON INTERVAL-10000 GOSUB 1190 


1280 PRESET(47,70):PRINT#1,"JE START MET 5 MINUTEN" 

840 INTERVAL ON 


1290 PRESET(40,100):PRINTfl,"DUH OP F1 OM TE BEGINN 

850 R=RND(-TIME) 


EN":F0R A=1 TO 200.NEXT 

860 1=115 


1300 ON KEY GOSUB 1330 

870 J=140:D=INT(RND(l)*140)+5:V=INT(RND(l)*13)+2 


1310 KEY(l) ON 

880 ON SPRITE GOSUB 1070 


1320 LINE{4O,1O0)-{23O,1O8),1,BF:FOR A=1 T0 200:NEX 

890 SPRITE ON 


T.-GOTO 1290 

900 FOR C=1 TO 255 STEP BX+V/10 


1330 REM HOOFDPROGRAMMA******* 

910 PUT SPRITE 3,(C,D),V,3 


1340 LINE(47,70)-(230,78),1,BF 

920 PUT SPRITE 1,(1,155),2,1 


1350 LINE(40,100)-(230,108),1,BF 

930 ON STRIG GOSUB 960:STRIG(0) ON 


1360 ON INTERVAL=10000 GOSUB 1730:INTERVAL ON 

940 NEXT C 


1370 R=RND(-TIME):D=INT(RND(1)*240)+15:J=140:V=INT( 

950 GOTO 850 


RND(l)*13)+2 

960 PLAY"V13L9B" 


1380 ON SPRITE GOSUB 1580.SPRITE ON 

970 FOR C=C TO 255 STEP BX+V/10 


1390 FOR C=1 TO 140 STEP BX+V/10 

980 PUT SPRITE 3,(C,D),V,3 


1400 PUT SUITE 3,(D,C),V,3 

990 J=J-5 


1410 IF STICK(0)=3 THEN 1=1+4 

1000 IF J=5 THEN GOTO 1030 


1420 IF STICK(0)=7 THEN 1=1-4 

1010 PUT SPRITE 2,(1-3,J),2,2 

- 

1430 PUT SPRITE 1,(1,155),2,1 
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1440 ON STRIG GOSUB 1470:STRIG(0) ON 

1450 NEXT C 

1460 GOTO 1370 

1470 PLAY"V13L9B" 

1480 FOR C=C TO 140 STEP BX+V/10 

1490 PUT SPRITE 3,(D,C),V,3 

1500 J=J-5 

1510 IF J=5 THEN GOTO 1540 

1520 PUT SPRITE 2,(1-3,J),2,2 

1530 NB(T C 

1540 PUT SPRITE 2,(1-3,209),2,2 

1550 J=0 

1560 GOTO 1370 

1570 REM EXPLOSIE EN SCORE**»* 

1580 PUT SPRITE 2,(1-3,209),2,2 

1590 PUT SPRITE 3,(C,209).8.3 

1600 LINE(68,178)-(120,186),1,BF 

1610 S=S+V*10 

1620 DRAW"BH68,178":PRINTfl,S 

1630 IF S>3000 AND S<3160 THEN G=1000:S=S+G:GOTO 22 

50 

1640 IF 5>10000 AND SU0160 THEN G=2000:S=S+G:GOTO 
2250 

1650 IF S)30000 AND S<30160 THEN G=5000:S=S4G:GOTO 
2250 

1660 FOR V=1 TO 15:PUT SPRITE 4,(I-3,J),V,4:F0R N=1 

TO 20:NEXT M.-NEXT V 

1670 PUT SPRITE 4,(1-3,209),10,4 

1680 GOTO 1370 

1690 PUT SPRITE 2,(1-3,2091,2,2 

1700 J=0 

1710 GOTO 1370 

1720 REM EINDSCORE************ 

1730 LINE(198,178)-(250,186),1,BF 

1740 IF T<S THEN T=S 

1750 IF T)S THEN T=T 

1760 DRAW"BM198,178":PRINTfl,T 

1770 STRIG(O) OFF 

1780 FOR Z=1 TO 3000:NEXT 

1790 REN OPNIEUW?************* 

1800 CLSrSCREEN 2 

1810 ON KEY GOSUB 1840,2170:KEY(1) 0N:KEY{2) ON 

1820 PRESET(40,100):PRINTfl,"NOG EEN SPEL F1 OF F2” 
1830 GOTO 1830 

1840 RB! GAME OVER************ 

1850 CLS:FOR A=1 TO 13:SCREEN 3.C0L0R A,l,l 

1860 PRESET(70,30):PRINTfl,"GAME" 

1870 PRESET(70,110):PRINTfl,"OVER" 

1880 FOR B=1 TO 50:NEXT BrNEXT A:GOTO 180 

1890 REN ***Shooting star**** 

1900 REM ‘Door Theo Nuyttens* 

1910 REM ****Uit Kortrijk**** 

1920 REN PUNTBITELLING**** 


1930 CLS:SCREEN 2,2:COLOR 15,1,1 

1940 DATA 254,254,254,254,254,254,254,254 

1950 Ri="" 

1%0 FOR K-l TO 8 

1970 RESTORE 1940:READ R:R$=R$+CHR$(R) 

1980 NEXT K 

1990 SPRITEi(5)=Ri 

2000 PRESET(80,5):PRINT#1,"PUNTENTELLING 

n 

2010 Y=37:C=2:P=20 

2020 FOR A=1 T07 

2030 PUT SPRITE C,(32,Y),C,5:PRESET(56,Y):PRINT#1," 

_n . p. " 

2040 FIELD=Y+16:C=C+1:P=P+10 

2050 NEXT A 

2060 Y=37:C-9:P-90 

2070 FM B=1 TO 7 

2080 PUT SPRITE C,(152,Y),C,5:PRESET(176,Y):PRINT#1 
,"=”;P;"PT." 

2090 Y=Y+16:C=C+1:P=P+10 

2100 NEXT B 

2110 PRESET(20,155):PRINTfl,"BIJ 3000 KRIJG JE 100 

0 BONUS" 

2120 PRESET(20,170):PRINTfl,"BIJ 10000 KRIJG JE 200 

0 BONUS" 

2130 PRESET(20,185):PRINTfl,"BIJ 30000 KRIJG JE 500 

0 BONUS" 

2140 FOR G=1 TO 10000:NEXT 

2150 GOTO 180 

2160 REM EINDE**"********* 1 ** 

2170 SCREEN lrWIDTH 30.-END 

2180 RB! BONUS************ 

2190 PRESET(30,80).-PRINTfl,"JE KRIJGT";G;"PT. BONUS 

ff 

2200 LINE(68,178)-(120,186),1,BF 

2210 PRESET(68,178):PRINTfl,S 

2220 FOR E=1 TO 1000:NEXT 

2230 LINE(30,80)-(230,88),1,BF 

2240 GOTO 850 

2250 PRESET(30,80):PRINTfl,"JE KRIJGT";G;"PT. BONUS 
» 

2260 LINE(68,178)-(120,186),1,BF 

2270 PRESET(68,178):PRINTfl,S 

2280 FOR E-l TO 1000:NEXT 

2290 LINE{30,80)-(230,88),1,BF 

2300 GOTO 1370 

regel : 10 - 0 regel .- 70-23 

regel : 20 - 82 regel : 80 - 208 

regel : 30 - 217 regel : 90 - 77 

regel .- 40 - 177 regel : 100 - 87 

regel : 50 - 138 regel : 110 - 183 

regel : 60 - 129 regel : 120 - 214 
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regel : 

130 

- 

7 

regel : 

580 

- 

81 

regel 

1040 

- 

74 

regel 

1490 

- 

128 

regel : 1910 


0 

regel : 

140 

- 

23 

regel : 

590 

- 

68 

regel 

1C50 

- 

236 

regel 

1500 

- 

139 

regel 1920 

- 

0 

regel : 

150 

- 

195 

regel : 

600 


189 

regel 

1060 

- 

0 

regel 

1510 

- 

85 

regel : 1930 

- 

129 

regel : 

160 

- 

55 

regel : 

610 

- 

189 

regel 

1070 

- 

227 

regel 

1520 

- 

77 

regel : 1940 

- 

144 

regel : 

170 

- 

0 

regel : 

620 

- 

152 

regel 

1080 

- 

223 

regel 

1530 

- 

198 

regel : 1950 

- 

169 

regel : 

180 

- 

176 

regel : 

630 

- 

153 

regel 

1090 

- 

241 

regel 

1540 

- 

227 

regel : 1960 


192 

regel : 

190 

- 

201 

regel : 

640 

- 

154 , regel 

1100 

- 

232 

regel 

1550 

- 

74 

regel : 1970 

- 

134 

regel : 

200 

- 

47 

regel : 



192 ' y regel 

1110 

- 

74 

regel 

1560 

- 

246 

regel : 1980 

- 

206 

regel : 

210 

- 

% 

regel : 

670 

- 

211 

regel 

1120 

- 

233 

regel 

1570 

_ 

0 

regel : 1990 

- 

183 

regel : 

220 


45 

regel : 

680 

- 

206 

regel 

1130 

- 

188 

regel 

1580 

- 

227 

regel : 2000 

- 

39 

regel : 

230 

- 

104 

regel : 

690 

- 

192 

regel 

1140 

- 

92 

regel 

1590 

- 

223 

regel : 2010 

- 

151 

regel : 

240 

- 

47 

regel : 

700 

- 

215 

regel 

1150 

- 

193 

regel 

1600 

- 

241 

regel : 2020 

- 

181 

regel : 

250 

- 

76 

regel : 

710 

- 

206 

regel 

1160 

- 

237 

regel 

1610 

- 

232 

regel : 2030 


34 

regel 

260 

- 

55 

regel : 

720 


192 

regel 

1170 

- 

236 

regel 

1620 

- 

74 

regel : 2040 

- 

142 

regel : 

270 

- 

251 

regel : 

730 

- 

219 

regel 

1180 

- 

0 

regel 

1630 

- 

37 

regel : 2050 

- 

1% 

regel : 

280 

- 

238 

regel : 

740 

- 

206 

regel 

1190 

- 

116 

regel 

1640 

- 

248 

regel : 2060 

- 

228 

regel : 

290 

- 

0 

regel : 

750 

- 

192 

regel 

1200 

- 

0 

regel 

1650 

- 

152 

regel : 2070 

- 

182 

regel : 

300 

- 

87 

regel : 

760 

- 

223 

regel 

1210 

- 

159 

regel 

1660 

- 

193 

regel : 2080 

- 

50 

regel : 

310 

- 

105 

regel : 

770 


206 

regel 

1220 

- 

6 

regel 

1670 

- 

237 

regel : 2090 

- 

54 

regel : 

320 

- 

170 

regel : 

780 

- 

162 

regel 

1230 

- 

241 

regel 

1680 

- 

246 

regel : 2100 

- 

197 

regel : 

330 

- 

213 

regel : 

790 

- 

164 

regel 

1240 

- 

149 

regel 

1690 

- 

227 

regel : 2110 

- 

99 

regel : 

340 

- 

159 

regel : 

800 

- 

166 

regel 

1250 

- 

74 

regel 

1700 

- 

74 

regel : 2120 

- 

161 

regel : 

350 

- 

77 

regel : 

810 

- 

168 

regel 

1260 

- 

245 

regel 

1710 

- 

246 

regel : 2130 

- 

181 

regel : 

360 


193 

regel : 

820 

- 

0 

regel 

1270 

- 

127 

regel 

1720 

- 

0 

regel : 2140 

- 

179 

regel : 

370 


153 

regel : 

830 

- 

202 

regel 

1280 

- 

155 

regel 

1730 

- 

245 

regel : 2150 

- 

75 

regel : 

380 

- 

140 

regel : 

840 

- 

67 

regel 

1290 

_ 

70 

regel 

1740 

- 

146 

regel : 2160 


0 

regel : 

390 

- 

0 

regel : 

850 


214 

regel 

1300 

- 

51 

regel 

1750 

- 

145 

regel : 2170 

- 

153 

regel : 

400 

- 

106 

regel : 

860 

- 

186 

regel 

1310 

- 

1% 

regel 

1760 

- 

127 

regel : 2180 

- 

0 

regel : 

410 

- 

153 

regel : 

870 

- 

230 

regel 

1320 

_ 

242 

regel 

1770 

- 

239 

regel : 2190 


240 

regel : 

420 

- 

85 

regel : 

880 


41 

regel 

1330 


0 

regel 

1780 

- 

82 

regel : 2200 

- 

241 

regel : 

430 

- 

208 

regel : 

890 

- 

92 

regel 

1340 

_ 

114 

regel 

1790 

- 

0 

regel : 2210 

- 

211 

regel : 

440 

- 

6 

regel : 

900 


68 

regel 

1350 

- 

167 

regel 

1800 

- 

177 

regel : 2220 

- 

101 

regel : 

450 

- 

241 

regel : 

910 


128 

regel 

1360 

- 

101 

regel 

1810 

- 

236 

regel : 2230 


117 

regel : 

460 

- 

83 

regel : 

920 

- 

165 

regel 

1370 

- 

98 

regel 

1820 

- 

206 

regel : 2240 


236 

regel : 

470 


74 

regel : 

930 


104 

regel 

1380 

- 

191 

regel 

1830 

- 

1% 

regel : 2250 

- 

240 

regel : 

480 

- 

245 

regel : 

940 

- 

198 

regel 

1390 

- 

209 

regel 

1840 

- 

0 

regel : 2260 

- 

241 

regel : 

490 

- 

127 

regel : 

950 


236 

regel 

1400 

- 

128 

regel 

1850 

- 

89 

regel : 2270 


211 

regel : 

500 

- 

155 

regel : 

960 

- 

134 

regel 

1410 

- 

242 

regel 

1860 

- 

76 

regel : 2280 

- 

101 

regel : 

510 

- 

70 

regel : 

970 

- 

117 

regel 

1420 

- 

247 

regel 

1870 

- 

190 

regel : 2290 

- 

117 

regel : 

520 


36 

regel : 

980 

- 

128 

regel 

1430 

- 

165 

regel 

1880 

- 

97 

regel : 2300 

- 

246 

regel : 

530 

- 

1% 

regel : 

990 

- 

139 

regel 

1440 

- 

104 

regel 

1890 

- 

0 




regel : 

540 

- 

226 

regel : 

1000 

- 

85 

regel 

1450 

- 

198 

regel 

1900 

- 

0 

Totaaltelling: 

: 32543 

regel : 

550 

* 

0 

regel : 

1010 


77 

regel 

1460 

- 

246 








regel : 

560 

- 

114 

regel : 

1020 

- 

198 

regel 

1470 

- 

134 








regel : 

570 

- 

167 

regel : 

1030 

- 

227 

regel 

1480 

- 

2 









. 
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MSX-INFO LEZERSSERVICE 


Moe van het 
overtikken van 
de listings uit MSX-Info? 

Maak het uzelf gemakkelijk, 
bestel gewoon een 

MSX-INFOLIST 

cassette of diskette 

Daarop staan alle programma’s uit dit blad, zodat het overtikken tot het verleden 
behoort en u de draaiende programma’s gemakkelijk kunt bekijken, 
maar ook weer veranderen of aanvullen. 

Prijs ƒ 21,50 per cassette ƒ 32,50 per diskette 


Bestellen 

De Infolist cassettes/diskettes kunnen alleen 
maar worden besteld door overmaking van 
het bedrag op giro. 3157656 t.n.v. Infolist. 
Nadat uw betaling is ontvangen, sturen wij u 
de cassette of diskette op, maar dat kan soms 
even duren, vanwege de produktietijd. 

Inl. 02152-62343, PB 1047, 1270 BA Huizen 

Vermeld bij uw bestelling welke cassette of diskette U wilt hebben. 


INFOLIST POSTBUS 1047 

HUIZEN 


mklusief verzendkosten en BTW. 


MSX-Infolist 1 AllelistinguitJrg. l,nr. 1,2en3 
MSX-Infolist 2 Alle listing uit Jrg. 1, nr. 4 en 5 
MSX-Infolist 3 Alle listing uit Jrg. l,nr. 6(19progr.) 
MSX-Infolist 4 Alle listings uit Jrg. 1, nr. 7 en Jrg. 2, nr. 1 
MSX-Infolist 5 Alle listings uit Jrg. 2, nr. 2 en 3 
MSX-Infolist 6 Alle listings uit Jrg. 2, nr. 4 en 5 
MSX-Infolist 7 Alle listings uit Jrg. 3, nr. 1 en 2 
MSX-infolist 8 7111e listings uit Jrg. 3, nr. 3 en 4 












Het huis van de toekomst staat vol met electronische apparatuur, dat wordt langzamerhand duide¬ 
lijk. Of er echter naast huiscomputer, audio/video en huishoudelijke nuttigheidsapparatuur nog plaats 
is voor hele nieuwe zaken, is de vraag. Home Automation blijkt zich slechts langzaam te ontwikklen, 
al zijn er nu toch wat bedrijven klaar voor de marketingsprong. Voorlopig is er nog vooral sprake van 
een internationaal schaduwgevecht. 


Home automation: 


Domotique en toekomsthuizen 


H et automatische huis is al lang geen science-fiction meer. Het is tech¬ 
nisch goed te realiseren, alleen is de prijs voor massa-marketing veel te 
hoog. Standaardisatie van de electronische ruggegraat van het huis van de 
toekomst is dus noodzakelijk, maar ook het onderwerp van veel industrie¬ 
politiek en onderonsjes. 


Thuis gebruik maken van de vele mo¬ 
gelijkheden van de electronica, de 
communicatie en schakeltechniek om 
allerlei functies automatisch uit te voe¬ 
ren, zo zou je Home Automation kun¬ 
nen omschrijven. Het is nog een beet¬ 
je een vaag begrip, waarbij men zich 
meestal wel iets voorstelt met allerlei 
afstandbediening, met camera’s, au¬ 
tomatische verlichting, schoonmaak- 
robots en veel nieuwe media, maar 
erg precies kunnen we het nog niet 
definiëren. De technici zeggen dan 
ook wel, dat technisch alles mogelijk 
is, maar dat de marketing moet uitma¬ 
ken wat er ook verkocht kan gaan wor¬ 
den. 

De grote bedrijven op het gebied van 
de consumentenelectronica, zoals 
Philips, Matsushita, General Electric, 
NEC, Electrolux en Zanussi weten al¬ 
lang, dat dit hele gebied over een jaar 
of tien tot vijftien een enorme markt 
gaat betekenen. Men is dan ook al 
druk bezig posities in te nemen, mark¬ 
ten af te schermen en politieke opzet¬ 
jes te make om de eigen afzet in deze 
belangrijke sector veilig te stellen. 
Men ziet in, dat over een paar jaar een 
wasmachine of beveiligingssysteem 
niet meer apart verkocht kan worden, 
maar tenminste een koppeling naar 
een centraal besturings-systeem in 
het huis aanwezig moet zijn. En over 
de specificaties van dat centrale sys¬ 
teem is men nu op een aantal fronten 


r 


druk bezig. De Japanners 
hebben een soort stan¬ 
daard voorgesteld, de 
Amerikanen maken druk 
plannen en ook in Europa 
is men bezig. Er is onder 
andere een Eureka project 
van de EEG om de te ko¬ 
men tot een standaard 
voor de home-bus, de cen¬ 
trale ader door het huis. 

Maar de afzonderlijke be¬ 
drijven vonken ondertus¬ 
sen dwars door al die af¬ 
zonderlijke standaardisa- 
tiecommissies heen en 
trekken hun eigen plan. 

Philips bijvoorbeeld is druk 
bezig om de eigen Domes- 
tic Digital Bus in allerlei 
commissies binnen te 
loodsen, en dat is bij de 
Europese electronicaclub CENELEC 
al aardig gelukt. Het diepere strategi¬ 
sche plan van Philips gaat echter ver¬ 
der, men speelt ook mee in het Eure¬ 
ka IHS project, maar houdt ook een 
paar kaarten in de mouw. 


Home Bus 

Kay Nishi, ooit de gevierde vader van 
MSX, was een van degenen die de 
wereld hebben gewezen op de poten¬ 
tie van de electronica en datacommu¬ 
nicatie als basis voor toekomstige ont- 


6:00 AM—SECURITY LIGHTS OFF. START COFFEE 

6 30 AM - WAKE TO STEREO AND LIGHT 

3 45 PM - PRE-COOL A ROOM 

4,5 PM — STEREO ON, HOUSE SOU NOS LFVEO IN 

5:45 PM-LIGHT UP HOUSE ENÏRANCE 

8:30 PM—SECURITY LIGHTS ON 


i _ 

ijHi 

3 rJ^ 



4 SPÉ 


ïlf 

_ ,c\ri BH 

TÉt? 

iSÉH 



CONVENIENCE 


wikkelingen. Hij bracht ook de term 
Home-Bus in verband met zijn gees¬ 
teskind, de MSX computer. Die zou de 
goedkope en universele bouwsteen 
moeten worden voor allerlei toepas¬ 
singen, van de huiscomputer via data¬ 
communicatie, nieuwe media naar de 
sprekende keukenmachines en pro¬ 
grammeerbare huisrobots. Helaas is 
de droom van Kay Nishi niet helemaal 
zo uitgekomen als hij gehoopt had, 
zijn MSX bleek te lijden aan een fun¬ 
damentele 8 bits bloedarmoede, is 
langzamerhand teloor gegaan aan de 
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industriepolitieke ruzies tussen Japan 
Ine. en Microsoft, overdonderd door 
het succes van MS-DOS en op de 
thuismarkt door Nintendo’s Famicon 
en NEC 9800 PC’s. 

Toch zijn er nog enige tienduizenden 
Toshiba MSX chips beland in home- 
automation systemen, onder andere 
in de centrale controllers van X-10 
Corporation en van GE (Homemin- 
der), mede door hun relatief lage prijs 
en handige architectuur (de duizend¬ 
poot Z-80 was de basis van MSX). 

Andere weg 

De home-computer bleek echter niet 
voldoende als springplank voor verde¬ 
re automatisering in de huiskamer. Te 
weinig mensen zagen de vele moge¬ 
lijkheden van een programmeerbare 
besturingseenheid voor allerlei func¬ 
ties in en rond het huis. Er zijn wel wat 
setjes verkocht, waarmee via de 
homecomputer of PC ook andere ap¬ 
paratuur aangestuurd kon worden, 
maar een groot succes is dat niet ge¬ 
worden. Bedrijven zoals Intellisys uit 
Dallas, dat grootschalig PC software 
wilde ontwerpen om het hele huis van¬ 
uit één punt te besturen, hebben on¬ 
dertussen afgehaakt. Het idee, dat ho¬ 
me automation een vervolg is op de 
office automation, en dat de computer 
in zijn basisvorm, dus met toetsen¬ 
bord en beeldscherm, de hoofdrol zou 
gaan spelen, is door vrijwel iedereen 
verlaten. 


Embedded 

Natuurlijk blijft de electronica wel een 
centrale rol spelen, en zullen chips en 
computers het hart vormen van welk 
systeem dan ook, maar ze zullen niet 
meer als computer herkenbaar zijn. 
Dergelijk ingebouwde ‘intelligentie’ 
noemt men wel 'embedded’, ingebed 
in het systeem. In de wasmachine en 
electrische oven zitten tegenwoordig 
wel degelijk computers, maar we zien 
die meer als programmeerbare ‘ti¬ 
mers’, als nuttige maar niet los te den¬ 
ken functies van het systeem. 

Domotique 

Het was Schotland, waar in de jaren 
70 de eerste serieuze produkten op 
het gebied van de ‘Home Automation’ 
werden ontwikkeld. Nog steeds is het 
daar gemaakte X-10 systeem, dat 
door middel van kleine extra pulsjes 
op het lichtnet allerlei apparatuur kan 
bedienen, het meest populair. Vooral 
in de VS zijn er veel van verkocht, bij¬ 
voorbeeld door Tandy/Radio Shack, 
maar de laatste tijd ook door bedrijven 
als Schlage. Het gaat om tegen de 10 
miljoen schakelmodules, hetgeen ook 
inhoudt dat er in de afgelopen vijf, zes 
jaar in ongeveer 500.000 huizen in de 
VS iets aan automatisering van aan/ 
uit functies voor lampen, apparaten, 
etc. is gedaan. Dat is op zich een be¬ 
hoorlijk aantal, maar gezien de onge¬ 
veer 140 miljoen huizen en huis¬ 
houdens in de VS nog lang geen ech¬ 
te doorbraak. Bovendien blijken veel 
mensen zoiets meer als speelgoed te 


zien, men koopt het, speelt er wat 
mee, maar dan gaat het in de kast. 

De Fransen, die na de Japanners op 
dit moment het meest actief zijn, heb¬ 
ben het woord Domotique bedacht 
voor huis-automatisering. In het Ne¬ 
derlands en Engels wordt dat iets als 
Domotica, maar dat woord is nog niet 
erg aangeslagen. 

Informatica hoofdrol 

De wereld staat wat betreft toepassing 
van de electronica aan de vooravond 
van een nieuwe revolutie, de informa¬ 
tica thuis. Niet alleen met een kleine 
huiscomputer voor wat tekstwerk en 
om wat mee te spelen, maar het gaat 
om het geïntegreerd gebruik van de 
electronica en informatica in prakti¬ 
sche toepassingen in het huis. Onder 
het begrip Home Automation vallen 
niet alleen automatische lichtschake¬ 
laars, maar ook security (beveiligings¬ 
apparatuur), robotica, klimaatbeheer¬ 
sing, de automatische en op afstand 
regelbare besturing van allerlei huis¬ 
houdelijke apparaten en audio/video 
apparatuur, een heel scala nieuwe 
toepassingen. 

Nu spreekt men daar al jaren over, het 
huis van de toekomst kent men in alle 
werelddelen, in alle talen en er zijn 
tientallen demonstratieprojecten, zo¬ 
als het Xanadu house bij Disneyland 
in de VS. Dat is ontworpen door de ar¬ 
chitect Roy Mason, nu ook de initia¬ 
tiefnemer voor de Home Automation 
Association in de VS. 

Ook in Japan zijn er experimenten, en 
nogal wat rijke mensen in de hele we- 



Coffee maker switches on Oven switches on in the meming Broken glass detector 
in the moening to heat croissants 

Washing machine works at 
cheap electricity ra'.e 


Flashlight 


Lighte switched on or off. 
Also keeps thievs away 


Indoor siren 


TV set switched on/off 
at set ómes 


Window magnehc contact 


Stexeo/video switched on/off 
at specific times 


\ > »18 1> C( t-24°C whenawakoning) 


Ouidoor üghltng 
'switched on 
oroff 


-Thermometer 


+ !0 0 C {+18 0 C evenings) 


Fire/smoke detector 


Switch built intc 
front door lock 


Schematische voorstelling van Electrolux Systeem 2000 


Alarm clcck, wakes 
mdividual family 
mombers separateiy 


Central 'bram' with y 
tolophone dialler 


VVashing machine works 
at low electricity rite 
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reld willen het allernieuwste hebben 
en laten op maat iets ontwikkelen. 
Maar dat zijn meestal dromen, expe¬ 
rimentele in elkaar geknutselde sys¬ 
temen, die voor normale mensen on¬ 
betaalbaar zijn'. Er zijn natuurlijk altijd 
mensen, die ook zelf zoiets willen 
hebben, maar dan zullen ze of veel 
geld moeten neertellen voor hun auto¬ 
matische deuropeners en klimaatcon- 
trole, ofwel heel handig zijn en het zelf 
maken. Maar de industrie beseft na¬ 
tuurlijk wel degelijk, dat Home Auto- 
mation op den duur een zeer interes¬ 
sante markt gaat worden en dat we 
over een paar jaar over een complete 
industrie praten. Dus is men al jaren 
bezig om de concepten voor Home 
Automation te ontwikkelen en gereed 
te maken voor massa-marketing. 

In ons land heeft men bij Philips al in 
1979 een systeem voor besturing van 
allerlei audio/video apparatuur ontwik¬ 
keld, dat men de Digital Domestic 
Bus poemde, tegenwoordig afgekort 
tot D B. Men heeft er bijna 10 jaar 
over gedaan om het concept te vervol¬ 
maken, maar nu is Philips met het 
D B systeem dan ook al aardig gevor¬ 
derd en heeft men het tot (Cenelec) 
standaard weten te promoveren. 

De Japanners, met hun eigen ideëen 
en hun eigen HomeBus standaard 
hebben kortgeleden de D 2 B bus geac¬ 
cepteerd als deel van hun standaard. 
Er wordt nu internationaal druk over¬ 
leg gevoerd om ook de Amerikanen 
met hun CE-Bus (Consumer electro- 
nics) tot een soort afstemming te be¬ 
wegen. De verschillende concepten 
overlappen elkaar en het is erg moei¬ 
lijk om een uniforme standaard te be¬ 
reiken, zelfs nu men daar in een EEG 
Eureka project mee bezig is. 

Daarbij komt, dat een aantal bedrijven 
ondertussen zelfstandig een eigen, 
niet gestandaardiseerd systeem heb¬ 
ben ontwikkeld en op de markt ge¬ 
bracht. Bang&Olufsen bijvoorbeeld 
heeft het BEOLINK systeem voor de 
bediening van audio en video in het 
hele huis. Het machtige Zweedse 
Electrolux heeft een zeer praktisch 
systeem, dat binnenkort in de winkels 
komt. Het richt zich in eerste instantie 
op de beveiligingsmarkt, waar men 
sneller de vraag hoopt te kunnen ge¬ 
nereren, maar kan worden uitge¬ 
bouwd tot een compleet systeem met 
alle functies. De naam van het Elec¬ 
trolux systeem is Ease. Thomson in 
Frankrijk zag ook in de beveiliging de 
eerste toepassing, maar haar Securi- 
scan systeem kost relatief veel, onge¬ 
veer 10.000 franse francs, 4.000 gul¬ 


den per woning. De marketing ver¬ 
loopt daarom nog maar moeizaam. 
Misschien is het ook niet de veiligheid, 
die als ‘booster’ voor Home Automa¬ 
tion zal gaan fungeren, maar zijn het 
juist aspekten als energiebesparing of 
gewoon meer comfort, die de ogen 
van het grote publiek zullen openen. 

Japan 

In Japan heeft men in theorie nu een 
soort standaard gedefinieerd, maar 
de finale versie daarvan blijft nog wat 



Bar code lezers kunnen ook nuttig 
gebruikt voor bij bijvoorbeeld 
keuken-automatisering/voedselbeheer. 


uit. Ondertussen blijken de verschil¬ 
lende partners, die hebben samenge¬ 
werkt om die standaard te maken, 
zich er ook niet echt veel van aan te 
treken. Nee (Nippon Electric Compa- 
ny) bijvoorbeeld, wel degelijk een 
partner in de Home Electronics Bus 
club van Miti/EIAJ, gaat ondertussen 
druk door met het maken van een heel 
andere oplossing, waarbij men zoge¬ 
naamde spread-spectrum technieken 
gebruikt om signalen op de net¬ 
spanning te zetten. Dat valt niet bin¬ 
nen de standaard, maar NEC heeft al 
eerder bewezen, de eigen oplossin¬ 
gen effectief te kunnen doorzetten. 
Ook Mitsubishi heeft, in samenwer¬ 
king met Cyberlynx, in de VS een sys¬ 
teem aangekondigd, dat helemaal 
niet aansluit bij de Japanse stan¬ 
daard. Ondertussen is Matsushita, dat 
met Philips een soort onderonsje 
heeft gemaakt, in Japan bezig ge¬ 
weest om de D 2 B oplossing van Phi¬ 
lips in de officiële Japanse standaard 
te krijgen. 


Eureka 

De hele situatie in het Eureka project, 
en mogelijk ook in het Esprit project 
dat er op gaat volgen, is bepaald 
vaag. Projectleider is Thorn EMI, 
maar de belangrijkste partners zijn 
Electrolux, Thomson en Philips. Men 
doet heel geheimzinnig over de feite¬ 
lijke doelen van de samenwerking van 
de bedrijven, er wordt een soort club- 


afspraak gemaakt en de buitenwereld 
wordt pas later op de hoogte ge¬ 
bracht. 

Dat is een gevaarlijke strategie, want 
zelfs met EEG-geld en in een EEG- 
project kan men te maken krijgen met 
de anti-monopolie regelgeving van de 
EEG. De mogelijkheid is aanwezig, 
dat een onderlinge afspraak tussen de 
deelnemers in het Esprit-project om 
die reden zal sneuvelen. Bovendien 
bestaat de kans, dat met name Elec¬ 
trolux, dat via dochters Zanussi en 
Oceanic betrokken is bij het Eureka 
IHS project, een standaard ontwikkelt 
en implementeert, waarna de andere 
partners zich terugtrekken en Electro¬ 
lux dan met de monopolie-Zwarte Piet 
blijft zitten. De openbaarheid en lega¬ 
liteit van dergelijke Europese projec¬ 
ten is dan ook een discutabele zaak, 
net zoals dat overigens voor de Ja¬ 
panse en Amerikaanse projecten 
geldt. Het zijn allemaal clubjes, die sa¬ 
men de markt willen afdekken en het 
daarmee voor kleinere bedrijven 
moeilijker maken. 


Kans voor klein 

Toch zijn het juist de kleinere bedrij¬ 
ven, die hoogstwaarschijnlijk de ver¬ 
dere ontwikkeling van de Home Auto¬ 
mation moeten stimuleren. Niet alleen 
de installatie ervan, het aanleggen 
van de bekabeling en het aansluiten 
van de diverse sensors en ‘actuators’, 
maar ook het service-aspekt is van 
belang. Het is al langer zo, dat er spe¬ 
ciale bedrijven zijn, waarop men een 
alarminstallatie kan aansluiten. Wan¬ 
neer er meer apparatuur beschikbaar 
komt met zogenaamde ‘telemetering’ 
opties, neemt ook de behoefte aan 
dergelijke dienstverlening toe. Verder 
zal er een hele industrie gaan ont¬ 
staan van softwarebedrijven, die indi¬ 
viduele oplossingen in een home-au- 
tomation systeem gaan programme¬ 
ren, speciale interfaces gaan ontwik¬ 
kelen en onderhoud plegen. 

Deze technieken zouden, gezien het 
enorme potentieel, veel meer stimu¬ 
lering verdienen in nationaal en inter¬ 
nationaal verband. Wanneer we be¬ 
denken, dat er nog steeds meer hui¬ 
zen en auto’s zijn, dat per huis ener¬ 
giebesparingen in de orde van enige 
duizenden guldens per jaar mogelijk 
zijn, dat betere beveiliging zichzelf 
ook terugbetaalt (in verzekeringspre¬ 
mies bijvoorbeeld), dan zou de Home 
Automation of Domotica best wat 
meer aandacht mogen krijgen. 

L.S. 
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************************************************************************* in BELGIE 



* onze nieuwe WINTER 87/88 CATALOGUS is nu uit. Stuur ons een kaartje * * 

* met je naam en adres + de vermelding 'MSX Info' * 

* en we sturen hem GRATIS toe. Of kom hem afhalen in de winkel. 
************************************************************************* 


zijn al onze artikelen verkrijgbaar bij : 
Het Computerwinkeltje pvba, 

M Sabbestraat 39, B-2800 MECHELEN 
telefoon (015) 206 645 


MSX Bestsellers Winter 1987 


HIERONDER EEN OVERZICHT VAN ACTUELE MSX BOEKEN 


Programmeren van de Z80 . 59,50 

Turbo Pascal Compleet . 68 

Programmeercursus MSX BASIC . 45 

Werken met Bestanden in MSX BASIC ... 45 

Handboek MSX . 79,50 

BASICODE-3 incl cassette MSX/MSX2 27,50 

40 Grafische Programma’s MSX . 29,50 

MSX Truuks en Tips deel 8 . 25,15 

MSX-2 Zakboekje . 27,75 

Grafische Experimenten voor MSX .. 34,50 

MSX ROM/BIOS Handboek . 55 

MSX BASIC (Sickler) . 30,75 

Toepassingen voor MSX computers .. 29,50 
MSX Programmeren in Machinetaal .. 32,50 

MSX Machinetaalhandboek . 34,80 

Machinetaal voor MSX Computers ... 39,50 
Tips en Trucs voor de MSX Computer 49,90 
MSX LOGO Spelenderwijs . 27,50 


Z80, BASIC, C, Logo, Pascal 

Zakboekje Z-80 . 25,25 

*Machinetaal Z80 - Gestruct . 39,50 

Microsoft BASIC - MSX BASIC ... 69 

De Programmeertaal C . 25 

Logisch Logo . 35 


MSX nederlands 

*BASIC Computerspellen MSX .. 27,50 
*Zakboekje MSX - BASIC, DOS . 21,50 
*MSX Handboek voor Gevorderd. 64,50 


*MSX LOGO Spelenderwijs . 27,50 

MSX-Computers in Basisschool 39,90 
MSX Computers en Printers .. 27,75 

MSX BASIC Handboek . 49,95 

MSX DOS Handboek v iedereen 26,75 
*MSX(2) BASIC en Machinetaal. 32,50 

MSX Disk Handboek. 29,80 

MSX DOS met Disk BASIC . 33,50 

BASIC Programmaas voor MSX . 25,50 


* Speciale MSX boeken aanbieding * 


* MSX EXPOSED. f 5,-* 

* normale prijs f 39,- * 

* * 


*********************************** 

MSX nederlands NIEUW! 

*Praktijksoftware voor MSX- 

Computers - ook voor disk . 27,90 
*MSX Computers en de Buitenwereld 


met print-lay-outs . 27,85 

*Elektronicaprojecten voor 

MSX Computers . 34,50 


MSX-2 BASIC Handboek . 57,05 _ 

Financiële Programmaas v MSX 25,75 

Het MSX Software boek . 27,90 — 

Werken met de MSX Computer . 25,75 

De MSX Gebruikersgids . 39,50 

Grafiek en Geluid voor MSX . 49,90 — 


ACTUELE MSX SOFTWARE (t=tape/d=disk/c=cartridge) 


MSX Nuttig : 

MSX-CALC cartridge ... 195 
Spreadsheet + Graphics 


MSX-TEXT cartridge ... 195 
Tekstverwerker + Database 

Musix (composer) . t 14,90 
MSX Artist . t 19 

Tasword nederlands .. t 95 
Tasword MSX . t 65 


Aacko Desk ..(3.5"). d 179 
database+tekstverwerker 

*SuperKasboek disk .. d 149 
voor privé boekhouding 
en vereniging 

Werken met MSX tape t 40 

MSX Utilities : 

*TURBO 5000 . cart 119 

speedsave+oa scrndump, 
voor MSXl/2,tape/disk 
Diskit -disk toolkit. d 69 

MSX programmeertalen : 

*Delta BASIC ... disk d 95 
BASIC uitbreiding voor 
uw MSX computer 


*Delta 

BASIC ... tape 

t 89 

Hisoft 

DevPac . 

t 79 

*Hisoft 

DevPac80 2.0 . 

dl65 

Hisoft 

Pascal . 

1125 

Hisoft 

Pascal 80 .... 

dl65 

Hisoft 

C++ .. 

dl65 

Flash 

(dis)Assembler 

dll9 


MSX Adventures 


*Gnome Ranger. t 39 

*Knight Ore .. t 59 


bevat de volgende level9 
adventures: 

Loosed Ore, A Kind of 
Magie, Hordes of the 
Mountain King 
Journey to the Centre of 


Earth . t 15 

Jewels of Darkness .. t 65 

Silicon Dreams. t 59 

Arcade Adventures 

*Deathwish 3 . t 32 

*Inspector Z (HAL) ... c 75 

Batman. t 36 

*Head over Heels . t 36 

*Knightmare . c 65 

*Maze of Galious. c 75 

Vampire . t 10 

Denk en bordspelen 

Bridge . t 55 

The Chess Game 1 . t 34,90 

Scrabble . t 45 

(engelstalig) 


*NASHUA diskettes per 10 * 


5 M single sided. 18 

3.5" single sided. 45 

3.5" doublé sided. 49 


MSX Sportsimulaties 


*BMX simulator .. 

. t 10 

Tenth Frame-bowling 

. t 39 

International Karate 

t 15 

Football Manager .... 

. t 36 

Wintergames . 

. t 39 

Formula 1 Simulator 

. t 10 

Konami Boxing . 

. c 65 

Konami Football .... 

. c 65 

Speedking motorrace 

. t 10 

MSX Flightsimulators 


Chopper I . t 

34,90 

Space Shuttle . 

. t 49 

*Ace of Aces . 

. t 39 

Flight Deck . d 

39,90 

Starfighter . t 

34,90 

NorthSea Helicopter 

14,90 

NorthSea Heli .d 

24,90 

Spitfire 40 . 

. t 39 

MSX-2 Software op disk 

*RF Assembler . 

...89 

onde MSX-DOS. 


*Metal Gear konami cart 75 

nieuwe MSX2 konami 


The Chess Game MSX-2 

59,90 

Chopper II . 

69,90 

*Vampire Killer .. cart 75 

Tasword MSX-2 ...... 

.. 149 

nederlandse tekstverw. 

*Snelfaktuur MSX-2 .. 

.. 149 

Kastan - database .. 

.. 149 

*Fastan fakturering 

300,50 

Fistan . 

300,50 

financiële administratie 


MSX arcade games: 

*F-1 SPIRIT . c 79 

de nieuwste Konami 
mega ROM met LSI 
Custom Sound Chip. 
*Nemesis II konami ... c 79’ 

*Livingstone . t 36 

*Deathwish III . t 32 

*Dota . t 29,90 

*Dota disk. d 39,90 

*The Living Daylights t 39 

*Feud . t 10 

*Storm Bringer. t 15 


Computer Hits 10 -3 . t 39 
10 msx games, oa: 

Buzz Off, Psychedelia, 
Slapshot, 3D Knockout, 
Mutant Monty, Turmoil, 
Time Bandits, Eddie Kidd 


Army Moves . t 36 

Penguin Adventure ... c 69 

*Aliens (vd film) .... t 39 

Gauntlet . t 39 

Gauntlet Deeper Dungeon 20 

Flash Gordon. t 15 

Arkanoid. t 36 

Game Master Konami .. c 75 
Konami spelenkraker, 

2 slots nodig 

MSXtra . t 35 

Konami Nemesis . c 65 

Konami The Goonies .. c 65 

Konami QBERT . c 75 

Konami Knightmare ... c 65 
Konami Hyperralley .. c 65 


I I M l l l ..I l l l l l l l ... 1 l l i 1 I I i I I I 1 I 1 I I I 1 I 1 1 1 
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winkel open van woensdag t/m zaterdag tussen 11.00 en 17.00 (maandag/dinsdag gesloten) alle prijzen inclusief BTW 
verzendkosten f 6,- per bestelling — vraag onze nieuwe WINTER 87/88 CATALOGUS aan 
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microcomputer tijdschriften boeken en software 


MUM IN I I I I. I M I I I 1 I 


11 m 


Tl I I I I I I I I I I f I I 


dealer aanvragen welkom 
































































































































































































































































































































































































































































































































































































Een van de basiskenmerken van de MSX-architectuur in vergelijking met andere homecomDuters 
was en is nog steeds het werken met een VDP met een eigen geheugen. 


Videoprocessing bij MSX: 

beperking of stille kracht? 


Weel tegenstanders van de MSX-standaard vonden dit maar niets en daar 
¥ was ergens wel iets voor te zeggen. Maar aan de andere kant betrof het 
voornamelijk 8-bitters die maar een direkt addresseerbaar geheugen had- 
□ 64K ' Haal daar 1. 6K vanaf en i e houdt niet zoveel meer over voor de 

BASIC-Interpreter en vrij programmeerbare geheugenruimte! Bij nader in- 
zien dus toch niet zo’n slecht idee voor een bios van 16K en een interpreter 
van 16K. En daarnaast nog 32K direkt addresseerbaar voor programma’s en 
systeemvariabelen. 


De op dit moment meest verkochte 
computer is de PC. Kijken we naar de 
PC dan zien we daar een architectuur 
die erg veel overeenkomsten vertoont 
met de MSX. Dat is natuurlijk niet zo 
vreemd als je weet dat beide syste¬ 
men door dezelfde softwarefabrikant 
ontworpen zijn. Het werken met een 
dergelijke architectuur heeft veel 
voordelen. Door de videochip anders 
dan de standaard sereens te program¬ 
meren worden er een aantal mogelijk¬ 
heden ontsloten die aan de grens van 
het menselijk bevattingsvermogen lig¬ 
gen. Dit is natuurlijk wel heel leuk, 
maar hoe komen we op het niveau dat 
de werking van deze VDP voor ons 
duidelijk wordt. En hoe kunnen we 
deze kennis toepassen om schijnbaar 
onhaalbare doelen op de MSX-com- 
puter te verwezenlijken! Dit artikel en 
hopelijk nog een aantal andere zal 
proberen op deze vragen een duidelijk 
antwoord te geven. 

We zullen ons eerst moeten voorstel¬ 
len hoe de MSX-computer werkt. Het 
hart van de MSX-computer is de Z80 
processor. Deze processor is direkt 
gekoppeld aan 64K geheugen. Voor 
de communicatie met andere onder¬ 
delen van het systeem maakt de pro¬ 
cessor gebruik van input en output 
poorten. Omdat niet iedere MSX-com¬ 
puter gelijk is gebruiken ze niet alle¬ 
maal dezelfde poorten voor dezelfde 
doeleinden. Om dit verschil in ontwerp 


op te vangen is er de BIOS; deze 
neemt de eerste 16K in beslag en ver¬ 
zorgt het vervoer van data van en naar 
de Z80 processor. Voor alle MSX- 
computers zijn de instappunten en de 
entrys altijd op dezelfde plaats. Het 
zijn de haltes van het systeem. 

Het spreekt voor zich dat het voor¬ 
gaande natuurlijk een vereenvoudig¬ 
de beschrijving van het MSX-systeem 
is. De hooks bijvoorbeeld worden niet 
genoemd. Dit is voor ons doel niet erg. 
Wij willen immers de mogelijkheden 
van de VDP bestuderen en kunnen 
toepassen. 

Nu weten we dus hoe de Z80 en de 
VDP met elkaar verbonden zijn, via de 
poorten die op hun beurt weer ge¬ 
bruikt worden door de bios. 

Werking van de VDP en zijn 
registers 

De werking van de VDP is in feite erg 
simpel. Hij bouwt een scherm op dat 
op de monitor of tv zichtbaar gemaakt 
wordt. Nu is de Z80 geen erg snel 
baasje, maar de VDP is dat wel! Want 
de VDP moet 50 maai per sec. het 
scherm opbouwen! De kloksnelheid 
van de VDP ligt dan ook rond de 10 
MHz. Omdat dit 50 maal per sec. ge¬ 
beurt is het beeld van de MSX-compu¬ 
ter dan ook erg rustig. Andere syste¬ 
men halen vaak dergelijke snelheden 
niet en dan krijg je van die hoofdpijn- 
verwekkende flikkerende beeldscher¬ 


VDP REGISTER INFORMATION 

REGISTER 0 

MSB LSB 

| 0 | 0 | 0 | 0 | 0 | 0 | M3 | Ë7] 

Texternal VIDEO 
<I=ENABLE) 

• MODE SELECT BIT 3 

REGISTER 1 

MSB LSB 

| 4/l6| BLNk[ IE I Ml I M2| 0 | S1ZE | MAG[ 

I ‘ Imagnihed sprite 

(l=MAGNIFIED) 

• SPRITE SIZE(I = I6XI6) 

• MODE SELECT BIT 1,2 

OINTERRL'PT ENABLE( I =ENABLE) 

<> DISPLAY ON/OFF(l =ON) 

• SELECT 4/I6K VRAM(I=8 0R I6K) 


MODE SELECT BIT I, 2. 3 


Ml 

M2 

M3 

DISPLAY MODE 

0 

0 

0 

GRAPHIC I 

(SCREEN 1) 

0 

0 

1 

GRAPHIC II 

(SCREEN2) 

0 

1 

0 

MULTI COLOR (SCREEN3) 

1 

0 

0 

TEXT 

(SCREEN0) 


De registers 0 en 1, en de mode select 
instelling 

men. Omdat de VDP 50 maal per se¬ 
conde het scherm opbouwt geeft hij 
ook 50 maal per seconde een inter- 
rupt. Dan zet de VDP de Z80 even uit 
om niet gestoord te worden tijdens de 
beeldopbouw. Ook dit is natuurlijk 
weer een vereenvoudigde voorstelling 
van zaken. 
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De VDP heeft net zoals de meeste 
processoren registers. Deze registers 
zijn kleine stukjes geheugen die zich 
in de VDP bevinden en waar informa¬ 
tie over het functioneren in opge¬ 
slagen staat. Veranderen we de infor¬ 
matie in deze registers, dan verandert 
ook de aktie die de VDP gaat onder¬ 
nemen. De informatie die naar de re¬ 
gisters geschreven wordt volgt dezelf¬ 
de weg als de informatie die naar de 
16K videoRAM geschreven wordt. Er 
zijn verschillende registers met ver¬ 
schillende functies. 

Er zijn in totaal 9 registers in de VDP, 
ze zijn van nul tot acht genummerd. 
Register 8 is een statusregister. Uit dit 
register kan worden opgemaakt in wat 
voor toestand de VDP zich bevindt. 
Dit register is dan ook alleen bedoeld 
om informatie uit te lezen. De manier 
waarop de registers in elkaar zitten is 
vrij eenvoudig, een register is precies 
1 Byte groot. Deze Byte is uit 8 bits op¬ 
gebouwd waarvan het meest linkse 
het MSB is en het meest rechtse het 
LSB. 

Maar er zit nog wel een addertje onder 
het gras! 

Sommige registers doen net alsof er 
voor het register nog een aantal bits 
zit. Dit zijn altijd bits die de waarde nul 
hebben maar het getal waar ze voor¬ 
staan natuurlijk groter. 


De registers 

Als we het LSB in register 0 verande¬ 
ren gaat de synchronisatie van de TV 
verloren. Het bit ernaast is bedoeld 
om de schermmode in te stellen of af 
te lezen. 

In register 1 kunnen we van links naar 
rechts met het MSB beginnen en de 
volgende functies veranderen. 

° Instellen van de hoeveelheid video¬ 
RAM. 

° Het scherm aan en uit zetten. 

° In en uitschakelen van interrupts. 

° Mode select BIT 1. 

° Mode select BIT 2. 

° Niet gebruikt. 

° 8*8 of 16*16 sprites. 

° Vergrote sprite aan/uit. 

In register 2 tot en met 6 staan adres¬ 
sen van de tabellen waar de VDP mee 
werkt. In de afbeelding staan echter 
wel een paar foute getallen achter de 
registers. Dit zijn nette getallen maar 
het hadden natuurlijk machten van 
twee moeten zijn. Het juiste getal 
waar we mee moeten vermenigvuldi¬ 
gen is twee tot de macht van het aan¬ 
tal nullen wat achter de sterretjes 


staat. Verder dient ook nog gezegd te 
worden dat het om beginadressen van 
de tabellen gaat. 

In register 7 staat voor in het register 
de voorgrondkleur en achter in het re¬ 
gister de achtergrondkleur in scherm 
nul en verder is het de randkleur. 

In register 8 zijn eigenlijk alleen de 
drie meest linkse belangrijk. De eerste 
is dat de VDP output aktief is en dat 
van register 1 de interrupt enable de 
waarde 1 moet hebben. De tweede 
houdt in dat er meer dan 4 sprites op 
een lijn voorkomen. De derde houdt 
bij of de sprites botsen. 

Nu weten we hoe de VDP registers er 
uit zien en wat voor functie ze hebben. 
Eén van de dingen die we niet direkt 
verklaard hebben is het feit dat de 
VDP met tabellen werkt om een 
beeldscherm op te bouwen. 

Er zijn slechts een beperkt aantal ta¬ 
bellen die niet altijd dezelfde functie 
hebben en ook worden ze niet in elke 
schermmode gebruikt. 

De VDP tabellen en hun 
functies 

We beginnen meteen maar met de 
sprites. Sprites bewegen zich niet 
over het scherm maar over een trans¬ 
parante laag die als het ware over het 
scherm heen ligt. In totaal zijn er 32 
van deze lagen. Maar toch kunnen er 
op een beeldlijn slechts 4 sprites 
zichtbaar zijn. Als er meer dan 4 zijn 
verdwijnt degene met het hoogste 
nummer gewoon! 

Om met de sprites te kunnen werken 
heeft de VDP twee tabellen nodig. In 
de ene tabel staat hoe de sprite eruit 
ziet en in de andere op welke plaats 
en welke transparant en in welke kleur 
de sprite staat. De tabel waar de spri¬ 
tes in staan heet de sprite pattern ta¬ 
bel. Deze tabel kan voor twee soorten 
sprites gebruikt worden. Als de table 
voor 8*8 sprites gebruikt wordt dan is 
het vrij simpel. De eerste 8 bytes van 
de tabel bepalen meteen de vorm van 
de sprite. 

Er zijn dan ook 256 sprite voorstellin¬ 
gen in de table te plaatsen. Bij de 
16*16 sprites ligt het wat anders. Daar 
zijn steeds blokken van 32 Bytes die 
achter elkaar liggen. De sprite zelf is 
doormidden gehakt. In de eerste 16 
Bytes bevindt zich de linkerhelft van 
de sprite en in de daarop volgende 16 
Bytes zit de rechterhelft van de sprite. 
Van dit soort sprites kunnen er 64 in 
de tabel opgeslagen worden. De tota¬ 
le lengte van deze tabel bedraagt 
2048h bytes, dat is precies 2K. 



De andere tabel is de sprite attribuut 
tabel, deze tabel is 128 Bytes groot en 
omdat er 32 sprites tegelijkertijd zicht¬ 
baar gemaakt kunnen worden, zijn er 
dus 4 Bytes per sprite beschikbaar. 
De Bytes worden per groep van vier 
achter elkaar in de tabel geplaatst, dit 
in volgorde van de transparanten, die 
van nul tot 31 gaan. Er is een Byte 
voor de kleur van de sprite, voor de x- 
positie en de y-positie van de sprite en 
er is een Byte waar het spritenummer 
uit de sprite pattern tabel in staat. 
Deze struktuur verklaart dan ook 
waarom het bij MSX-2 in de scherm 
modes 6 en 7 niet mogelijk is om de 
sprite 512 verschillende x-posities te 
laten innemen. Voor deze x-positie is 
maar 1 Byte gereserveerd en in 1 Byte 
passen maar 256 posities!! 
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Als we ons echter beperken tot MSX- 
1 hebben we vier schermmodes. 
Daarvan zijn er twee tekstschermen 
en twee grafische schermen. De 
tekstschermen heten 0 en 1 en de gra¬ 
fische schermen 2 en 3. Alleen in de 
schermmode 0 wordt er geen gebruik 
van sprites gemaakt. 

Om de andere tabellen en hun sa¬ 
menhang te begrijpen moeten wij ons 
het scherm voorstellen alsof het niet 
uit enkele beeldpunten is opgebouwd 
maar als een scherm dat opgebouwd 
is uit blokjes van acht bij acht beeld¬ 
punten. Dit heet karaktergeoriënteerd. 
Deze blokjes hebben een nummer dat 
tussen de nul en 256 ligt. Nu gebruikt 
de VDP een tabel die net zo groot is 
als er van die blokjes geplaatst kun¬ 
nen worden. Deze tabel heet dan ook 
de naam tabel. In deze tabel staan re¬ 
gel voor regel voor elk blokje (karak¬ 
ter) een Byte met daarin een getal dat 
verwijst naar een andere tabel. Dit is 
de pattern tabel. In deze tabel staat 
het eigenlijke karakter afgebeeld in 8 
opeenvolgende Bytes net zoals dat bij 
de sprites het geval was. 

Voor de schermmodes 0 en 1 gaat dit 
goed op maar bij schermmode 2 is het 


0 

8 

16 

24 

1 

9 

17 

25 

2 

10 

18 

26 

3 

11 

19 

27 

4 

12 

20 

28 

5 

13 

21 

29 

6 

14 

22 

30 

7 

15 

23 

31 

256 

264 

272 

280 

257 

265 

273 

281 

258 

266 

274 

282 


De bytes in de pattern- en colortabel zijn 
op deze wijze op het beeldscherm 
geplaatst in schermmode 2 


wat anders georganiseerd. Er is wel 
een naam tabel maar deze is eigenlijk 
verdeeld in 3 gedeeltes. Ditzelfde 
geldt ook voor de pattern tabel. Om 
het mogelijk te maken dat er een ho- 
ge-resolutie schermode beschikbaar 
was moesten er een paar truuks aan 
te pas komen. Het scherm werd in drie 
gedeeltes verdeeld, het eerste ge¬ 
deelte verwees naar het eerste ge¬ 


deelte van de naam tabel en de pat¬ 
tern tabel en de color tabel. 

En voor de andere gedeeltes was de 
procedure identiek. De Color tabel is 
in schermmode 2 een tabel die net zo 
in elkaar zit als de pattern tabel, maar 
de Bytes stellen nu niet de beeldpun¬ 
ten voor, maar de voor- en achter- 
grondkleur van deze beeldpunten. 
Per groep van acht punten zijn er 
daardoor maar 2 kleuren beschikbaar. 
De Color tabel wordt in schermmode 
1 gebruikt om aan bepaalde karakters 
bepaalde kleuren toe te kennen. En in 
scherm 3 neemt het de totale kleurin- 
delinq van het scherm voor zijn reke¬ 
ning. 


Dit was het voor deze keer, de volgen¬ 
de keer gaan we wat met de VDP 
stoeien. Ook bespreken we dan hoe 
we toegang (acces) tot de VDP krij¬ 
gen. Daar zijn verschillende mogelijk¬ 
heden voor die we allemaal de revue 
laten passeren. 


NEOS MS-10 Mouse and Cheese 

De ideale MSX-muis met grafisch pakket! 





Voor MSX-1: 

NEOS-muis + Cheese 1 f 175,- 


SALASAN 

Kwaliteitssoftware voor MSX 

Postbus 5570, 1007 AN Amsterdam 
Ö 020-273198 


: m I 



Voor MSX-2: 

NEOS-muis 4- Cheese 2 + 
demoschijf 


f 190,- 


Dealeraanvragen welkom 

Alle prijzen inklusief BTW en verzendkosten. 
Levering bij vooruitbetaling op giro 5641219 van 
Salasan Amsterdam met vermelding van het be¬ 
treffende programma. Rembourszendingen zijn 
mogelijk, maar daarvoor brengen we ƒ 5in reke¬ 
ning. Omruil garantie voor modules, laadfouten- 
garantie bij cassettes. Uitsluitend originele soft¬ 
ware. 
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DELTA BASIC 

Hoezo slechts 24 K beschikbaar voor Basic? Met DELTA BASIC maakt u 
programma’s van 100 tot 10.000 K in Basic! 

Waarom nog verdwalen in een bos van GOSUB-routines? DELTA BASIC 
geeft uw MSX-computer de mogelijkheid van PROCEDURES, waarvan u 
zelf een in principe oneindige bibliotheek kunt aanleggen! 

Is uw beeldscherm simpel? Met DELTA BASIC beschikt u over tien ver¬ 
schillende WINDOWS! 

DELTA BASIC verlegt de grenzen van MSX-BASIC. DELTA BASIC kent 
het gebruik van WINDOWS voor een overzichtelijker en efficiënter 
beeldschermgebruik, de CHAIN-mogelijkheid om vanuiteen programma 
nieuwe programma’s in te laden met behoud van bestaande variabelen, 
het gebruik van PROCEDURES voor beter en inzichtelijker programme¬ 
ren, en een schat aan extra Utilities waarover elke programmeur reeds 
lang wilde beschikken. 

WINDOWS 

- WINDOW (definieert window; max. 10 tegelijk mogelijk) 

- LOCATE (zet cursorpositie binnen window; 10 onzichtbare cursors!) 

- WPRINT (geeft weer binnen window) 

- WINPUT (vraagt input binnen window) 

- WBOX (zet kader om window) 

- CLS (veegt window schoon) 

- FILL (vult window met letterteken) 

- ROLL (rolt inhoud window naar boven/onder/links/rechts) 

- WRAP (idem; wat aan ene kant verdwijnt, komt aan andere kant terug) 

- LISTWINDOW/LLISTWINDOW (overzicht Windows) 

CHAIN 

- COMMON (legt te bewaren variabelen vast) 

- CHAIN (laadt en runt ander programma, en haalt variabelen terug) 

PROCEDURES 

- DEFPROC (geeft begin procedure aan) 

- ENDPROC (geeft eind procedure aan) 

- PROC (roept procedure aan) 

- SAVEPROC (bewaart procedure op disk/cass.) 

- MERGEPROC (haalt procedure van disk/cass. en koppelt 'm aan programma) 

- DELETEPROC (wist procedure) 

PLUS... 

- TFILES/LTFILES (overzicht bestanden op cassette) 

- AVERIFY (verifieert BASIC-ASCII bestand op cassette) 

- BVERIFY (verifieert byte-bestand op cassette) 

- BAUD (selecteert BAUD-rate voor cassette-saven tussen 900 en 3000) 

- DFILES/LDFILES (geeft inhoud disk inclusief lengtes en vrije ruimte) 

- SETDRIVE (selecteert default drive) 

- STORESCREEN/RESTORESCREEN (bewaart/haalt compleet scherm terug) 

- SCREENSAVE (maakt scherm na bepaalde tijd donker tegen inbranden) 

- SCREEN/OFF (zet scherm aan/uit) 

- CLEARSPRITES (wist alle sprices) 

- INIPSG (initieert sound-generator. stopt geluid direct) 

- INIFNK (zet functietoetsen terug op originele waarden) 

- KILLBUF (wist toetsenbord-buffer) 

- GET (pakt eerstvolgende toetsdruk) 

- PAUSE (wacht bepaalde tijd of tot toetsindruk) 

- CAPSON/OFF (zet hoofdletter-mode aan/uit) 

- POL (kijkt of printer on-line staat) 

- BISET/BIPRINT (selecteert bit-image mode op printer) 

- SCREENDUMP (stuurt beeldscherm naar printer) 

- DPEEK (geeft de inhoud van 2 geheugenadressen samen; 0-65536) 

- DPOKE (zet getal 0-65536 in twee opeenvolgende geheugenadressen) 

- LOWER (verzekert kleine letters in string) 

- UPPER (verzekert hoofdletters in string) 

- STATUS/LSTATUS (geeft overzicht geheugengebruik) 

- UNNEW (haalt programma terug na NEW) 

- FIND (zoekt tekst in BASIC-programma) 

- REPLACE (vervangt tekst in BASIC-programma) 

- MOVLIN (verplaatst BASIC-regels) 

- COPLIN (kopieert BASIC-regels) 

- CODETODATA (zet geheugeninhoud om in DATA-regels) 

- LISTGO/LLISTGO (overzicht regelnrs. waar GOSUB’s/GOTO’s heenspringen) 

- LISTLIN/LLIST (overzicht regelnrs. waarin GOSUB's/GOTO’s voorkomen) 

- LISTPROC/LLISTPROC (overzicht procedures) 

- LISTVAR/LLISTVAR (overzicht variabelen) 

- LISTTYPE/LLISTTYPE (overzicht variabelen-typeringen) 

- LISTDATA/LLISTDATA (overzicht regelnrs. met DATA-statements) 

- LISTUSR/LLISTUSR (overzicht adressen door DEFUSR’s aangegeven) 

- LISTPSG/LLISTPSG (overzicht instellingen geluidsgenerator) 

- LISTSCREEN/LLISTSCREEN (overzicht SCREEN-waarden) 

DELTA BASIC werkt op alle MSX-computers met tenminste 64K geheugen. Het wordt van tevo¬ 
ren in het geheugen geladen, en neemt slechts enkele bytes van de beschikbare BASIC-ruimte af. Al¬ 
le beeldscherm-opdrachten werken in SCREEN 0. I en 2. DELTA BASIC blijft in het geheugen ook 
na een RESET. Het programma heeft een uitgebreide Nederlandstalige handleiding, met natuurlijk 
een syntax-overzicht van alle nieuwe commando’s en functies, en tal van voorbeeldprogramma's. 
DELTA BASIC is te bestellen bij uw dealer, of rechtstreeks bij Filosoft. Profiteer van een lage prijs 
voor een prima programma: 

DELTA BASIC disk: f 95, - cass.: f 89, - 


HET BESTE EDUCATIEVE COMPUTERPROGRAMMA 
DAT OOIT IN NEDERLAND IS VERSCHENEN 

REKENEN MET ABACUS EN HONDERDVELD 

REKENEN MET ABACUS EN HONDERDVELD is geruime tijd 
getest in verschillende klassen van de basisschool. Het programma 
werkt op iedere MSX-computer met een diskdrive. Het program¬ 
ma bestaat uit drie delen: tekenen, tellen en optellen. Elk deel is een 
voorbereiding op het volgende deel. Het is een samenhangend re¬ 
kenpakket voor kinderen van vijfeneenhalf tot tien jaar. 

Kinderen kunnen via een ikoonmenu keuzes maken. De essentie 
van het programma berust op sturing middels behaalde resultaten. 
Dit betekent dat het programma zorgt voor de overgang naar een 
volgend niveau wanneer de resultaten van het kind dat toelaten en 
het advies geeft op hetzelfde niveau te blijven of terug te gaan naar 
een vorig wanneer een kind nog teveel fouten maakt. Het pro¬ 
gramma draagt op deze manier zorg voor een consequente begelei¬ 
ding van het kind. 

REKENEN MET ABACUS EN HONDERDVELD sluit nauw aan bij 
de in het onderwijs gebruikte methoden van abacus en honderd- 
veld. 

N.B. Een speciale schoolversje is in voorbereiding, waarin extra 
mogelijkheden voor docenten zijn opgenomen zoals: het 
uitzetten van groepsrekenlijnen, het uitzetten van indivi¬ 
duele rekenlijnen, uitgebreide administratiemogelijkheden 
per groep en per individu en daarnaast diverse printopties. 
Prijs op aanvraag. 

Rekenen met abacus en honderdveld kost f 99,- incl. BTW. 

Andere programma's van FILOSOFT 
voor MSX-computers: 


TASWORD MSX 

De Nederlandstalige tekstverwerker voor 




MSX-1 computers 

cass f 

95,- 

TASWORD MSX-2 

De Nederlandstalige tekstverwerker voor 




MSX-2 computers 

disk f 

149.- 

DELTA BASIC 

Een wezenlijke uitbreiding voor 




MSX-BASIC 

disk ƒ 

95,- 

DISKIT 

De toolkit voor diskette-gebruik op 




MSX computers 

disk f 

69,- 

REKENEN MET 

Een samenhangend, procesbewakend 



ABACUS EN 

rekenpakket voor kinderen van vijfeneenhalf 


HONDERDVELD 

tot tien jaar 

disk f 

99,- 

REDEKUNDIG 

Een degelijk oefenprogramma om 



ONTLEDEN 

het redekundig ontleden onder de knie te 




krijgen 

cass f 

59,- 

DEVPAC 

Een assembler, disassembler en monitor 




voor MSX-1 

cass f 

79,- 

DEVPAC80 

Een assembler, disassembler en monitor 



(versie 2) 

voor MSX-I en MSX-2 computers met min. 64 



RAM en een aangesloten diskdrive 

disk f 

165,- 

PASCAL 

Gestructureerd en inzichtelijk 




programmeren * * 

cass ƒ 124. — 

PASCAL 80 

De diskuitvoering van PASCAL * * 

disk f 165,- 

C+ + 

Een bijzonder krachtige C compiler voor 




MSX 

disk ƒ 

165,- 

1 TJING 

Computerversie van het orakelboek 

disk/ - 

79,- 

MSX-64 PLUS 

Hulpprogramma (o.a. tekst uitvergroten. 




(64 lettertekens per regel op het beeldscherm) 




cass f 

34,50 

DRIE IN EEN 

Aardrijkskunde, tekenen en rekenen voor 




kinderen vanaf 6 jaar 

cass f 

34,50 

MSX-BRIDGE 

Een bridge-programma voor beginners 

cass f 

49,- 


INFORMATIE 




Programma's, gemerkt met 2 sterren (* *) vereisen (enige) kennis van de Engelse taal. Vraag onze 
gratis folder aan d.m.v. een briefkaartje (o.v.v. MSX) naar: Postbus 1353, 9701 BJ Groningen, of 
telefonisch: 050-137746. Filosoft produkten zijn te koop in de goede computerzaak, maar ook 
rechtstreeks te bestellen: door storting van het bedrag + ƒ 3,50 verz.kosten op giro 20792 t.n.v. 
Filosoft, Groningen. Telefonische bestellingen (+ rembourskosten) worden zo snel mogelijk nog 
dezelfde dag verzonden. Voor gratis telefonisch advies: vrijdag. Filosoft servicedag! 

























Op 20 en 21 november werden in Utrecht weer de inmiddels traditionele HCC-dagen gehouden. Met 
meer dan 40.000 bezoekers was er de gebruikelijke drukte, die overigens vrijdagmiddag sneller te- 
rughep dan in de voorgaande jaren. Zaterdag was enorm druk, vrijwel tot sluitingstijd. Vooral de scho- 

XÏtanXlï" V ° 0rraad 9 ° edk0Pe SOftWare 6n hU " a ' 9emene kenniS Van he ' 


HCC-dagen 1987 


Weinig MSX nieuws 


D e HCC-dagen gaven als vanouds de indruk van een soort veemarkt voor 
computers, tenslotte de electronische huisdieren van onze tijd Veel 
mensen, stuntprijzen en gesleep met dozen naar de trein, het favoriete ver¬ 
voermiddel naar Utrecht voor deze traditionele computerkoopbeurs. 


We kregen de indruk dat echte show- 
makers, zoals Genisys vorig jaar, de 
moed hebben opgegeven, ai waren 
bepaalde firma’s als vanouds in de 
prijzenslag, waardoor in de loop van 
de dag de prijzen daalden. 

Men had nu ook wat echte stands bij 
elkaar gezet, maar het blijft altijd een 
typische gewaarwording de luxe 
stands van ‘voorname’ firma’s te zien 
naast marktkraampjes met tweede¬ 
hands printers. 

Voor de ware koopjesjagers viel er 
echter wel wat te beleven. Er gingen 
dan ook heel wat dozen en volgepak¬ 
te tassen naar buiten. De eerste koper 
ontmoetten we al even over tien uur in 
de ochtend, met een zojuist verwor¬ 
ven Amiga 500 (het klapstuk van de 
beide dagen) op weg naar de par¬ 
keerplaats. Hij wist wat hij nodig had 
en was doelbewust op de leverancier 
afgegaan en kocht meteen. 


Afwachten 

Anderen deden er langer over en we 
spraken iemand die na vrijdag de hele 
dag geweest te zijn, zaterdag terug¬ 
kwam om ’s middags de felbegeerde 
harddisk tegen de allerlaagste spot¬ 
prijs te kopen. Helaas, hij was te laat. 
Toch werd er, naar ons idee, minder 
hardware gekocht dan voorgaande ja¬ 
ren. 


Het publiek, dat in het verleden vaak 
nog bestond uit mensen die aan de 
computerhobby wilden beginnen, is 
door de popularisering van de compu¬ 
ter allengs aan het veranderen. Het 
zijn nu meer men¬ 
sen die randappa¬ 
ratuur of verbruiks- 
materiaal willen in¬ 
slaan. Sommige le¬ 
veranciers waren 
dan ook niet tevre¬ 
den met de com¬ 
merciële resulta¬ 
ten, in vergelijking 
met de voorgaande 
jaren. 

Ja, de prijzen staan 
onder druk, maar 
de marges zijn zo 
klein, of in het ge¬ 
heel afwezig, dat 
de prijsverschillen 
steeds kleiner wor¬ 
den. Het tijdstip dat 
alles gratis wordt 
weggegeven zullen 
we immers wel niet bereiken. 

Er werd ook veel rommel aangebo¬ 
den, als we dat zo oneerbiedig mogen 
noemen: lege dozen, oude en nieuwe 
kasten en behuizingen e.d., hele par¬ 
tijen vage floppies uit de C-64 hoogtij¬ 
dagen, die nu ook voor de PC worden 
aanbevolen, maar niet echt betrouw¬ 
baar zijn op de B-kant. 


Opvallend was tevens dat na de prijs- 
stunters in de hardwaresektor, nu de 
prijsdumping op softwaregebied is uit¬ 
gebroken. 

Professionele software-pakketten gin¬ 


gen voor een fraktie van de voorheen 
geldende prijs over de toonbank. Wel¬ 
iswaar waren het niet de nieuwste ver¬ 
sies van Lotus, MS-Word e.d., maar 
toch zeer bruikbare programma’s, die 
vorig jaar nog meer dan duizend gul¬ 
den moesten opbrengen. Onze vraag 
is dan of men ook support geeft bij die 
ramsj-prijzen. 



MSX INFO 5/87 


55 







MSX-aftermarket 

Een andere ontwikkeling was de nau¬ 
welijks herkenbare aanwezigheid van 
MSX. Was dit de laatste beurs, waar 
nog MSX-hardware en software te 
koop was? We vrezen het. 

Dit jaar bleek MSX niet meer de grote 
smaakmaker te zijn, er waren relatief 
weinig softwarehuizen met leuke pro- 
dukten, het bleef bij randapparatuur 
en supplies. Salasan was één van de 
weinige aanbieders van MSX-soft- 
ware, Philips liet wat Radarsoft-pak- 
ketten draaien op haar stand, terwijl 
Aackosoft echt in de uitverkoopslag 
ging met de laatste restjes software. 
Het eens zo vooraanstaande bedrijf is 
in moeilijkheden, er zijn onduidelijke 
berichten over contracten tussen 
Aackosoft en andere Leidse (ad-hoc) 
softwarebedrijfjes. Het einde van het 
bedrijf lijkt in zicht, men heeft in een 
soort sterfhuisconstructie de activitei¬ 
ten overgeheveld naar onder andere 
Methodic Solutions, dat ons met ver¬ 
warrende persberichten bestookt. Op 
de HCC-dagen hield men duidelijk 
ook uitverkoop, de MSX software ging 
voor 5 gulden de kraam uit. 

Jammer, ooit was Aackosoft een voor¬ 
aanstaand softwarehuis van Europe¬ 
se klasse, altijd actief op allerlei beur¬ 
zen en nu dus aan het afglijden. 

HCC 

De gebruikersclubs hebben op de 
HCC-dagen altijd veel aanloop. De 
IBM-PC gg had een ware stand inge¬ 
richt en verkocht zich blauw. Maar ook 
de zich wat bescheidener presente¬ 
rende MS/DOS gg (samen met CP/M 
gg) mocht zich in een grote belang¬ 
stelling verheugen. Uitgesproken stil¬ 
le stands waren aanwezig van ‘uitster¬ 
vende’ computers, een opvallend 
spandoek ten spijt, dat de foute tekst 
in levensgrote letters bevatte: "Tl, the 
computer that revuse to die." 

De hele HCC is nu qua deelname aan 
de verschillende gg’s wat harder aan 
het worden, men moet nu als lid kie¬ 
zen voor één gebruikersgroep. 


HCC Reorganisatie 

De HCC is trouwens in meer opzich¬ 
ten aan het reorganiseren. Men krijgt 
nog wel erg veel nieuwe leden, maar 
die aanwas wordt voornamelijk be¬ 
reikt door bij PC-Privé projecten grote 
aantallen abonnementen al dan niet 
tegen kwantumkorting weg te geven. 
Een leuke manier om de club uit te 
breiden, maar of het dan om echt ge¬ 
motiveerde leden gaat of slechts om- 


een verkapte abonnementswerving 
voor de nieuwsbrief laten we aan de 
lezer ter beoordeling over. De hele or¬ 
ganisatie van de HCC kraakt nogal, 
de directeur vertrok onlangs zeer plot¬ 
seling en men heeft nu alle min of 
meer winstgevende activiteiten maar 
snel in aparte stichtingen onderge¬ 
bracht, waarmee de leden vrijwel de 
zeggenschap verliezen over bijvoor¬ 
beeld de bestemming van de op¬ 
brengsten. Maar de kwaliteit van bij¬ 
voorbeeld de HCC nieuwsbrief neemt 
daarmee wel toe, want het HCC be¬ 
stuur, de advertentie-exploitant Speci¬ 
al Media en V&V systems betaalden 
een reisje voor twee redacteuren van 
de HCC Nieuwsbrief naar Taiwan. 
Resultaat een heleboel promo-praat 
van vaag gehalte en schoolreisachti¬ 
ge verslagen over de reis. Erger is het, 
dat op de voorpagina van de HCC- 
Nieuwsbrief nu een fraaie afbeelding 
prijkt van een AT Blue van V&V Sys¬ 
tems in handen van een Taiwanese 
Sinterklaas. Het is alleen zo jammer, 
dat Bert Vlaanderen (V&V Systems) 
sinds midden oktober in gebreke is 
gebleven zijn schulden (ter waarde 
van ongeveer 900.000 gulden, voor 
een deel ook advertentie-rekeningen 
van o.a. de HCC en ons bedrijf) te be¬ 
talen. Zien we hier een typische HCC- 
vermenging van persoonlijke voorde¬ 
len en belangen (?), het was vrij alge¬ 
meen bekend, dat V&V Systems in de 
problemen was, zeker voordat men de 
HCC Nieuwsbrief ging drukken. De 
hele stichtingsstructuur zal het ontra¬ 


felen van deze warboel vast niet ge¬ 
makkelijker maken. 

Varia 

De HCC dagen waren verder vooral 
druk, wild en daarmee ook heel gezel¬ 
lig met hier en daar wat bijzondere at¬ 
tracties. 

Floris Kolvenbach met muziek en le¬ 
vend vee met mest en computerge¬ 
stuurde voedering verhoogde de at- 
traktiewaarde van het geheel. De ma- 
rathon-computeraars zullen zich dit 
echter niet gerealiseerd hebben. Zij 
zaten met roodomrande ogen hun¬ 
toetsenborden te beroeren. Leuk of 
niet, we laten de beoordeling aan hen¬ 
zelf over. 

Leuk was verder de Poolse deelname 
aan de beide dagen, men had een 
computerclub (HCC-collega) uit dat 
land een kraam gegeven, waar toch 
wel vrij veel bezoekers eens kwamen 
kijken, wat men aan de andere kant 
van Europa zoal aan computeren 
doet. 

In ieder geval zijn er nu al weer be¬ 
denkers van stunts en attracties bezig 
te denken aan de HCC-dagen van 
1988. Het zal me wel weer wat moois 
worden, al kunnen we ons een meer 
heldere organsiatiestructuur voorstel¬ 
len. Met tegen de 50.000 leden zou 
wat professionalisering geen kwaad 
kunnen. 
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In HiFi-winkels en demonstratieruimten wordt vaak zeer veel geschakeld om de verschillende appa¬ 
raten in diverse kombinaties te laten horen. De bronnen kunnen gekozen worden: CD-spelers, kas- 
settedecks, platenspelers, tuners; de versterkers kunnen geschakeld worden: merk A, merk B enz. 
Kees van der Vlies belicht een marktsegment waarin de computer goede diensten kan bewijzen. 


Computerstoring en HiFi 


HIFI-S CH AKEL-UNITS 

H et is voor de klant in de meeste HiFi-zaken scherp opletten en goed ont¬ 
houden wat er nu precies gedemonstreerd wordt: Was die versterker 
nr.1 nu een ONKYO of een LUXMAN ? Kostte die BOSE-luidspreker nu ƒ 395 
of ƒ 595 ? Luister ik nu naar het cassettedeck of de radio ? 



De verkoper moet met een liefst ein¬ 
deloos geduld talloze malen schake¬ 
len van de ene combinatie naar de an¬ 
dere. De klant kan zich na verloop van 
tijd wat ongemakkelijk gaan voelen 
als hij erg lang beslag legt op de be¬ 
reidwilligheid van de verkoper. 

Hier lijkt een taak voor de computer 
weggelegd. Het geduld van de com¬ 
puter is eindeloos, de schakelmoge¬ 
lijkheden zijn zeer talrijk en de bijbe¬ 
horende informatie kan via een beeld¬ 
scherm zichtbaar gemaakt worden. 
Toch heeft het tot nu toe ontbroken 
aan gebruikersvriendelijke schakel- 
eenheden. Dit heeft ermee te maken 
dat het schakelen van hifi-komponen- 
ten iets anders is dan het schakelen 
van de huiskamerverlichting of het 
koffiezetapparaat. Het gaat namelijk 
om zeer komplexe en vrij zwakke sig¬ 
nalen, die gevoelig zijn voor storingen: 
schakelklikken, brom, ruis, vervor¬ 
ming, niveauverschillen, aantasting 
van het frekwentiebereik etc. 


Een Nederlands produkt 

De Nederlandse firma Lumibel Soft¬ 
ware Enterprises in Arnhem heeft een 
komplete set op de markt gebracht, 
waarmee hifi-apparatuur op alle mo¬ 
gelijke manieren automatisch gescha¬ 
keld kan worden. De kastjes heten: 
Robot 101, Robot 202 en Robot 303. 
Alleen de computer en de vereiste ka¬ 
bels behoeven eraan gekoppeld te 
worden en de installatie draait. De 
meegeleverde software is bestemd 
voor de Commodore-64 of 128, maar 
ook een MSX-versie is al beschikbaar 


en andere versies (PC ?) zijn of wor¬ 
den ontwikkeld. 

Tal van zaken zijn hiermee te pro¬ 
grammeren: 

° 1) de met elkaar te verbinden kom- 
ponenten 

° 2) de volgorde waarin de onder¬ 
scheiden kombinaties 'automatisch’ 
klinken 

0 3) de speelduur van iedere kombi- 
natie 

° 4) de op het beeldscherm weer te 
geven informatie 

0 5) overslaan van minder gewaar¬ 
deerde kombinaties 

° 6) lichtsignalering van de ingescha¬ 
kelde komponenten 

° 7) beveiliging van de aangesloten 
apparatuur tegen diefstal 

De ingevoerde gegevens kunnen te 
allen tijde door de gebruiker gewijzigd 
of aangepast worden. Men heeft zich 


dus qua veelzijdigheid geen beperkin¬ 
gen willen opleggen. 


De apparatuur 

De kasten zijn in de bekende 19-inch 
racks te monteren, maar kunnen ook 
los staan. 

De Robot 101 is bestemd voor het 
schakelen van maximaal 15 luidspre- 
kerparen (waarvan eventueel 5 stel 
aktieve boxen). 

De Robot 202 kan verschillende ver¬ 
sterkers (maximaal 15) schakelen en 
heeft, zoals de andere Robots, een 
uitgang voor direkte LED-aansturing, 
welke m.b.v. relais ook voor aanstu¬ 
ring van spots te gebruiken is. 

De Robot 303 schakelt (maximaal 15) 
bronnen en bewaakt de aangesloten 
apparaten. Daarvoor is zelfs een accu 
ingebouwd. Geen der aangesloten 
apparaten kan ongemerkt wegge¬ 
haald worden. Het uitgangssignaal 
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kan ook voor opname op een recorder 
gebruikt worden (3 uitgangen). 

In (lijn)niveau-aanpassingen is voor¬ 
zien, zodat niet telkens de volume¬ 
regelaar hoeft te worden bijgesteld. 
Voor handbediening zonder computer 
is een los toetsenbord leverbaar. Ui¬ 
teraard vervalt dan de programmeer¬ 
mogelijkheid. 

Alle ‘Robots’ kunnen dubbel worden 
uitgevoerd, zodat de capaciteit ver¬ 
groot wordt; ook samenvoegen van 
verschillende units is mogelijk. In der¬ 
gelijke gevallen zal de programmatuur 
aangepast worden. 

De software 

De verschillende schakelfunkties kun¬ 
nen gemakkelijk ingevoerd worden; 
ook de bij elke funktie behorende 
tekst, die op het scherm moet ver¬ 
schijnen. De gebruiker kan deze zelf 
wijzigen. Overigens is de toegang tot 
het programma wel via een code¬ 
woord beveiligd, zodat de klant of een 
andere onbevoegde niet in het pro¬ 
gramma kan gaan pionieren. 

Via een vraag- en antwoordprocedure 
geeft de gebruiker aan wélke funkties 
en welke schermteksten (bv. menu’s) 
geprogrammeerd worden. In eerste 


instantie zullen dat de aangesloten 
komponenten zijn, waaruit gekozen 
zal worden, dan de volgorde waarin 
ze te horen moeten zijn, automatisch 
overschakelen met tijdsduur per kom- 
binatie of handmatig overschakelen, 
invoer van ongewenste komponenten 
(die dan overgeslagen zullen wor¬ 
den), namen, prijzen en gegevens van 
de afzonderlijke komponenten of 
combinaties en eventuele andere ver¬ 
meldenswaardige zaken. Uiteraard 
kunnen alle ingevoerde gegevens op 
diskette worden opgeslagen. 

Kortom allemaal aan de praktijk ont¬ 
leende toepassingen. 

Hardware 

De kasten zijn duidelijk voor profes¬ 
sionele toepassingen ontworpen. De 
behuizing is degelijk, de connectoren 
zijn 'gold plated’ en - dit is wel het be¬ 
langrijkste - de relais zijn degelijk uit¬ 
gevoerd met goudkontakten. Pure Hi- 
Fi-fanaten kunnen namelijk subtiele 
klankveranderingen waarnemen, die 
veroorzaakt worden door (mechani¬ 
sche) schakelaars in de signaalweg. 
Dit is vaak ook een kwestie van over¬ 
tuiging bij de betreffende audiofielen; 
die door de solide uitvoering van de 


schakelkasten wel niet aan het wan¬ 
kelen gebracht zal worden. Wij heb¬ 
ben geen hoorbare klankaantasting 
kunnen waarnemen. Opvallend was 
het ontbreken van schakelklikken en 
de naadloze overgangen, een bewijs 
van vakkundige uitvoering. De com¬ 
puter wordt met een vlakbandkabel 
aan de Robots gekoppeld. Bij de luid- 
sprekeraansluitingen kunnen de dikke 
speciale speakerkabels worden toe¬ 
gepast, zodat men niet beperkt is tot 
het schemerlampsnoer. Het beeld¬ 
scherm moet natuurlijk op een plaats 
opgesteld worden waar de klant er 
goed zicht op heeft. Zonodig kan een 
beeldignaal-versterkertussengescha- 
keld worden. 


Prijzen 

De Robot 101 en 202 kosten ieder 
ƒ 1970,-. het programma gaat ƒ 640,- 
kosten, de flatcable (10m) ƒ 125, en 
het losse toetsenbord (alleen nodig bij 
gebruik zonder computer) ƒ 100,-. Dit 
zijn prijzen excl. BTW. 

Inlichtingen bij Lumibel Software En¬ 
terprises, Jansbuitensingel 2, 6811 
AA Arnhem, tel., 085-432446. 


Gebruikersgroepen 


Mechelse Computer Vereniging 

Als onderafdeling van de C.U.C. MSX/Spectravideo ge¬ 
bruikersgroep is in Mechelen de Mechelse Computer 
Vereniging van start gegaan. Het lidmaatschap van de 
C.U.C. kost 650 BFr, het kontaktadres van de Medchel- 
se Computer Vereniging is: Herman Hermans, Kleine 
Nieuwedijkstraat 17, 2800 Mechelen, België. 

MSX-Groot Den Haag 

De computervereniging MSX-Groot Den Haag vergaart 
en verspreidt kennis van en over de MSX-computers. Dit 
gebeurt in de ruimste zin van het woord, met uitzonde¬ 
ring van het kopiëren van programma’s. De vereniging 
houdt zich op de eerste woensdag van de maand bezig 
met het verspreiden van kennis in clubverband, door 
middel van instructielessen in o.a. Basic voor beginners 
en gevorderden, machinetaal en Dbase, gegeven door 
ervaren instructeurs. Tevens komt het demonstreren van 
programma’s, nieuwe machines e.d. aan de orde. De 
vereniging geeft een eigen blad uit, en heeft ongeveer 70 
leden uit de wijde omgeving van Den Haag. Be¬ 
langstellenden kunnen contact opnemen met tel. 070- 
996872 of 997247. 


MSX-Club Oost-Gelderland 

Omdat veel gebruikers behoefte hadden aan uitwisseling 
van kennis en ervaring en in de omgeving er nog geen 
MSX-club aanwezig was, is nu al weer ruim een jaar ge¬ 
leden door enkele enthousiaste MSX- computergebrui¬ 
kers de MSX-Computerclub Oost-Gelderland opgericht. 
Zij proberen MSX-gebruyikers te motiveren tot een beter 
en professioneler gebruik van de MSX-computer en wil¬ 
len af van het vooroordeel ‘homecomputer is spelcompu¬ 
ter . Met name door het aanbieden van een uitgebreide 
leden service proberen zij dit te bereiken. Voor nadere in¬ 
formatie over lidmaatschap en de activiteiten van de club 
organiseert de club op 11 december, 29 januari, 12 en 26 
februari en 11 en 25 maart clubavonden in het clubge¬ 
bouw van de Modelbotenvereniging ‘Atlantis’ Schimmel- 
pennicklaan la te Zutphen. Naast deze clubavonden or¬ 
ganiseert deze club ook cursussen over Basic, machine¬ 
taal, ontwikkeling en aanpassing van software, informa¬ 
tievoorziening en software/boeken bibliotheek. Inl.: Post¬ 
bus 600, 7200 AP Zutphen, tel 05750-27741 (na 18.00 
u) 
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Garbage collection is voor de rasechte MSX-er een vies woord met een naar bijsmaakje. Over het 
verschijnsel is slechts weinig bekend. In dit artikel wordt de achtergrond geschetst en aangegeven 
hoe de tijdrovende Garbage Collection voorkomen kan worden. 


Garbage Collection 


W at is nu eigenlijk precies Garbage Collection? Vertaald naar het Neder¬ 
lands betekent het zoiets als vuilnis verzamelen. Voor de MSX-gebrui- 
ker is het een verschijnsel dat de computer gedurende enkele minuten vast 
laat slaan en dan daarna doodleuk weer verder laat gaan. En dit alles zon¬ 
der zich om de gemoedsrust van de onschuldige computeraar te bekomme¬ 
ren! 


MSX profeten zeggen dan ook wel 
eens dat door deze tekortkoming het 
MSX systeem niet met de MS-DOS 
computers kan concurreren. Ook al 
komt er een harde schijf voor MSX, 
een computer die zolang op zich laat 
wachten heeft gewoon geen toe¬ 
komst. Deze conclusie is mijns in¬ 
ziens een duidelijk voorbarige. Ik hoop 
dan ook het hoe en waarom van Gar¬ 
bage Collection duidelijk te maken. En 
last but not least een aantal goede tips 
te geven om het optreden van Garba¬ 
ge Collection te voorkomen.! 

Bij het zoeken naar goede documen¬ 
tatie over het onderwerp Garbage 
Collection werd het me meteen al niet 
makkelijk gemaakt. In allerlei hand¬ 
boeken over MSX, gebruiksaanwijzin¬ 
gen, speciale uitgaven, boeken met 
truuks en tips en noem maar op, wor¬ 
den vele onderwerpen behandeld. 
Maar, u raadt het al, niets maar dan 
ook niets over Garbage Collection! 

Ik was het onderwerp Garbage Col¬ 
lection al bijna vergeten, toen ik toe¬ 
vallig de reference manual van mijn 
nog steeds onovertroffen Yamaha 
CX-5m computer doorlas. Eerst dacht 
ik even dat ik droomde maar nee hoor, 
het stond er echt: Garbage Collection! 
Mijn nieuwsgierigheid was nu geheel 
gewekt, eindelijk een spoor!! Via dit 
spoor ben ik nog op een aantal ande¬ 
re bronnen gekomen zodat er een 
toch wel redelijk duidelijk plaatje te¬ 
voorschijn is gekomen. Waarom ik u 
dit allemaal vertel? De meeste men¬ 
sen denken vaak dat wij de informatie 
door de fabrikanten op een presen¬ 


teerblaadje krijgen. Uit het boven¬ 
staande wordt denk ik wel duidelijk dat 
dat toch echt niet zo is. 


Wat is Carbage Collection 
De computer heeft een gedeelte van 
zijn geheugen voor strings gereser¬ 
veerd. Voor de duidelijkheid nog even: 
strings zijn alfanumerieke variabelen. 
En alfanumeriek houdt weer in letters 
en cijfers. Hoeveel de computer daar¬ 
voor reserveert kunnen we zelf instel¬ 
len met het CLEAR-statement. Als we 
dit niet instellen is dat 200 Bytes maar 
strings hebben een belangrijke eigen¬ 
schap die numerieke variabelen niet 
hebben. Hun lengte kan variëren. 

Als we maar lukraak van deze strings 
gebruikmaken kunnen er twee dingen 
gebeuren. Het eerste is gewoon te 
weinig gereserveerd geheugen; het 
tweede is Garbage Collection. Er is 
dan in principe genoeg plaats in het 
voor strings gereserveerde gedeelte 
van het geheugen maar het staat alle¬ 
maal door elkaar in plaats van netjes 
achter elkaar. Ook staat er nog alle¬ 
maal oude niet meer belangrijke infor¬ 
matie in. Dit hele proces van in het 
stringgeheugen orde op zaken stellen 
heet dus Garbage Collection!! 

Op zich dus niets op tegen, maar de 
computer doet er wel erg lang over. 
Enkele minuten is heel normaal en 
dan te bedenken dat de MSX compu¬ 
ter toch makkelijk een miljoen instruk- 
ties per sekonde aankan! 

Maar zoals iedereen wel weet is voor¬ 
komen altijd beter dan genezen. Het 


eerste wat wij ons dan ook moeten af¬ 
vragen is: wanneer treedt nu eigenlijk 
dit volraken van het stringgeheugen 
op? Het antwoord hierop is vrij simpel: 
bij veelvuldige stringbewerkingen! En 
die treden meestal op bij bewerkingen 
als sorteren, zoeken, en muteren in 
een gegevensbestand. En juist bij die 
bewerkingen is snelheid erg belanq- 
rijk! 

Daarom is Garbage Collection vooraf 
of naderhand vrij nutteloos omdat de 
Garbage Collection meestal tijdens 
een proces toeslaat! 

Ondanks dat is het toch bij sommige 
programma’s succesvol om voordat 
er een spontane Garbage Collection 
optreedt dit door het programma te la¬ 
ten doen. Dit doen we door een 
FRE(”") STATEMENT in het program¬ 
ma op te nemen. Maar dit is natuurlijk 
slechts een doekje voor het bloeden. 


BS 


CD 

ÉI 



in 

0 



Garbage Collection vindt ook plaats bij 
robots, die met patroonherkkenning 
werken. Het geheugen wordt zo van 
vervuilende informatie ontdaan 
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Voorkomen van Garbage Collection 

Als er veel strings aktief zijn, of veel tijd-kritieke handelin¬ 
gen in het programma, dan is Garbage Collection niet ge¬ 
wenst. We kunnen dan natuurlijk peek, poke, vpeek, vpoke 
gebruiken om data op te slaan zonder van stringruimte ge¬ 
bruik te maken. Maar daar worden programma’s niet snel¬ 
ler van, en ook gebruiken we geen strings meer. 

Er is nog een andere oplossing. De zogenaamde in-plaats- 
van string operaties. 

Hoe pakken we dit nu aan? 

Om te beginnen reserveren we genoeg stringruimte om 
een kopie van elke string te kunnen plaatsen, met laten we 
zeggen nog honderd Bytes extra. Daarna initialiseren we 
elke string met SPACES() daarna gebruiken we elke keer 
als we een toekenning aan een string doen het MIDS() sta¬ 
tement. 

Dat ziet er dan zo uit: 

MIDS(A$,1 )=STRINGUITDRUKKING 

Dit zal voorkomen dat er nieuwe strings gecreëerd worden, 
en toch het gebruik van stringvariabelen, operaties en ver¬ 
gelijkingen mogelijk maken. Gebuikt men echter toch func¬ 
ties, operaties of statements die gebruik maken van de 
stringgeheugenruimte en deze opgebruiken dan treedt 
Garbage Collection alsnog op. 


De laatste speciale truuk om nieuwe strings te voorkomen 
en de zaak lekker snel te laten werken is het gebruik van 
het SWAP statement. 

Dit is echt het beste voor elke sorteerroutine. Dit statement 
ruilt alleen de drie Byte-pointers om en bemoeit zich niet 
met de stringdata! 


Dit beeld is arm 
aan 

beeldinformatie. 

Pas.als de 
ALMOST-poorten 
in de hersenen het 
met elkaar ‘eens’ 
zijn, zal de 
betekenis aan het 
bewustzijn worden 
aangeboden. Dan 
pas zal men de kop 
van een koe hierin 
herkennen 



Software 


R adarsoft is ongetwijfeld de grootste leverancier van Nederlands talige 
programma’s. Direkt na het verschijnen van het eerste Desktop Publis- 
hing pakket voor de MSX "Dynamic Publisher" werden we aangenaam ver¬ 
rast door een drietal nieuwe MSX-2 spelen. 


BREAKER 

Breaker is een volgend aktie spel van 
Radarsoft met zeer veel speciale 
MSX-2 effecten. Smooth scroll en 256 
kleuren gekombineerd maken dit spel 
tot een aantrekkelijk geheel. De mu¬ 
ziek en de geluidseffecten blijven 
boeien. Na het opstarten van dit spel 
krijgt u de keuze waarmee u wilt gaan 
spelen. Is dit een muis, joystick, of met 
het toetsenbord ? Speelt u met een of 
met twee spelers ? Allerlei variaties 
zijn hierbij mogelijk. Nadat deze keu¬ 
ze is gemaakt worden de blokjes ge¬ 
toond die een speciale waarde heb¬ 
ben en de zeer speciale blokjes die 
bepaalde effecten geven. Er zijn blok¬ 
jes met een waarde van 10, 20, 30 en 
40 punten. Er zijn blokjes die het ra¬ 
cket vergroten en verkleinen al naar 
gelang van de stand. Aktie blokken 
geven de richting aan, bonus blokken 
kunnen een aardige aanvulling voor 
de hoogste score betekenen. Het doel 


is met 5 ballen u een weg te breken 
door het 500 !! schermen grote veld 
met vele kleurrijke door de computer 
opgeworpen barrières. 

Een aantal geheimzinnige ingangen 
kunnen u op een andere plaats weer 
laten verschijnen. Dit kan een welko¬ 
me hulp zijn, maar niet altijd. De bal is 
gewoon op te vangen maar ook is het 
mogelijk de bal met het racket naar 
voren te duwen. U heeft de beschik¬ 
king over twee rackets waarbij door 
een van de speciale effect blokjes er 
soms een verdwijnt. Het is ongelofelijk 
moeilijk de bal steeds weer in het spel 
te houden. Het is mij nog niet gelukt 
het spel uit te spelen maar het zijn 
meer dan 23 levels spelplezier. De 
hoogste score lijst loopt van af begin¬ 
ner op naar professional. 

Dit spel is goed verzorgd evenals de 
andere twee, en een nette verpakking 
maakt het geheel kompleet. De hand¬ 
leiding is summier en kan veel duide¬ 
lijker. Het is nu soms wat zoeken hoe 



Breaker 


het spel werkt. Verder vraag ik me af 
of het niet mogelijk is voor de Neder¬ 
landse markt een aparte versie te 
brengen waardoor ook de wat jongere 
kinderen zonder hulp kunnen spelen. 
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Zoo 

Zoo is een avonturenspel dat Kan wor¬ 
den gespeeld zonder dat u het toet¬ 
senbord nodig heeft. Met de muis, 
joystick of de cursortoetsen bestuurt u 
de grafische cursor waarmee u allerlei 
voorwerpen kunt oppakken, wegleg¬ 
gen, openen en sluiten etc etc. Er 
hoeft dus niet meer worden gezocht 
naar de soms toch moeilijke opdrach¬ 
ten, dus iedereen kan nu adventures 
spelen. Het verhaal speelt zich af in en 
om een dierentuin. Er is iets vreemds 
aan de gang, deze noodkreet krijgt u 
uit betrouwbare bron. Wie, wat, waar 
en hoe, u als plaatselijke medewerker 
van de dierenhulp organisatie moet 
daar zien achter te komen. Er wordt 
door de dierentuin direktie steeds in 
het geheim nieuwe dieren gekocht en 
dus is er voor u werk aan de winkel. 
Kijk goed uit het blijkt dat niemand te 
vertrouwen is. 

Het spel begint op de straat. De kof¬ 
fer die u bij u draagt bevat allerlei nut¬ 
tige dingen die u van dienst kunnen 
zijn. Natuurlijk is hierbij een sleutel, u 
weet niet hoelang de reis gaat duren 



Zoo 

dus een tandenborstel ontbreekt ook 
niet. Een fototoestel een horloge en 
een aantal ongezonde stikstokjes 
complimenteren het geheel. Met deze 
artikelen kunnen we beginnen met het 
oplossen van dit raadsel. Omdat we 
zonder kontant geld op zak niet zo ver 
komen, moeten we voor dat we de 
dierentuin met een bezoekje gaan 
vereren eerst geld gaan halen bij de 


bank. Hier blijkt dat we geen cheques 
bij ons hebben dus moeten deze eerst 
gevonden worden. Een kijkje bij de 
twijfelachtige stichting HAED wat 
staat voor hulp Aan Eenzame Dieren 
brengt u hopelijk een stapje dichter bij 
de oplossing. Denk om een sleutel 
deze kan hier wel te pas komen. Om 
het spoor niet meteen kwijt te raken 
staan er op diverse plaatsen pijlen. 
Laat u echter niet op een dwaalspoor 
brengen. Omdat we bij de dierentuin 
ons niet kenbaar willen maken als de¬ 
tective bezoeken we deze dierentuin 
als gewoon bezoeker. Het kost ons ƒ 
10,- toegang. Na hier een kaartje ge¬ 
kocht te hebben zijn we dan aange¬ 
land in het mysterieuze park. Omdat 
de eerste indruk meestal de juiste is 
komt deze dierentuin er niet erg best 
af. Een verwaarloosde plattegrond 
wekt niet veel vertrouwen dus ver¬ 
standiger is het om zelf maar op zoek 
te gaan. Onderweg komt u diverse ar¬ 
tikelen tegen waarbij de afweging 
moet worden gemaakt of deze nog 
nuttig kunnen zijn en dus moeten wor¬ 
den meegenomen. Hiervoor blijkt de 
koffer een onmisbaar attribuut te zijn. 
Bij de giraffen staat een behulpzame 
bewaker, nou ja wat heet behulp¬ 
zaam. Hij wil wel iets kwijt maar alleen 
als hier iets tegenover staat. Bij de 
Gemsen blijkt duidelijk dat hier iets 
mis is. Normaal gesproken knorren 
deze mooie beesten niet. Na een on¬ 
derzoek ter plaatse wórdt het een en 
ander duidelijk. We vervolgen onze 
weg door de dierentuin. Voorbij de Ze¬ 
bra’s komen we een dronken individu 
tegen. Wat moetje nu met deze man, 
is het dronkemans praat wat hij ver¬ 
teld of schuilt er een deel waarheid 
achter. Problemen genoeg dus. De 
olifanten en de leeuwen zien er erg 
hongerig uit, of is dat verbeelding. Uit¬ 
kijken is dus de boodschap. De pin- 
quins en ook het bezoekje aan het 
prehistorisch museum is zeker de 
moeite waard. Een nader onderzoek 
in het kantoor en de garage kunnen 
zeer lonend zijn. De beste tijd voor 
deze onderzoeken is ongetwijfeld 
rond het middag uur als de oppassers 
net even zijn gaan eten. Maar doe er 
niet te lang over want ze hebben het 
niet erg op vreemdelingen. Een kluis 
een geheimzinnig kastje met sleutels, 
waar duidt het allemaal op, is dit raad¬ 
sel eigenlijk wel op te lossen? U staat 
voor een raadsel, een mysterie, wat 
en hoe u bent er nog niet achter. Al ligt 
de oplossing voor de hand er moeten 
nog bewijsstukken worden gevonden. 
Hiervoor dient u de juiste artikelen 
mee te nemen. Combineer bepaalde 


feiten, ontrafel het geheim van de die¬ 
rentuin, vertrouw niemand en kijk 
overal. Komt u er de eerste keer niet 
uit, de moed er inhouden en vrolijk 
weer een nieuwe poging gaan wagen. 
Op een keer krijgt u alle bewijzen in 
handen of zo u wilt in de koffer dan is 
het een 'klein kunstje’ de juiste man of 
vrouw te arresteren. 


RAD-X 

Het geheel speelt zich af boven een 
nieuwe planeet en ver in de toekomst. 
U heeft de beschikking over een su¬ 
persnelle space-jet. Deze space-jet is 
eenvoudig te besturen. Alleen een 
joystick is voldoende om van de pla¬ 
neet op te stijgen en de meest inge¬ 
wikkelde capriolen uit te halen. 


NMS8W1 SEi 



Rad-X 

Je hebt maar een opdracht en die is 
de planeet te beschermen tegen aan¬ 
vallen van je tegenstanders. Deze zijn 
in grote getallen aanwezig. De plaat¬ 
jes van de planeet zijn zeer gevari¬ 
eerd en leiden je vaak af van je op¬ 
dracht. Natuurlijk ontbreekt ook de 
hoogste score pagina niet. Het pro¬ 
gramma biedt geweldige geluids en 
muziek effecten. Deze maken het 
spelen van dit soort spellen veel inte¬ 
ressanter. Doordat de achtergrond 
werkt met smooth scrolling sereens is 
het een bijna oneindig geheel gewor¬ 
den. Het valt niet mee om elke keer 
weer de bonus, die bij 250 punten aan 
het eind van het level wordt verkre¬ 
gen, te verdienen. Voor de liefhebber 
is het een stuk speelgoed wat voor 
vele uren spelgenot kan zorgen. 
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Een girobetaalkaart of Eurocheque voor het totaalbedrag is 
bijgesloten. De software-pakketten worden zonder verdere 
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Deze bon (of een copie) en betaalmiddel in gesloten envelop 
opsturen naar Sala Communications, Postbus 5570, 
1007AN Amsterdam. 
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BIJNA 800 MSX ARTIKELEN 
OOK BUDGET-SOFTWARE (MEER DAN 100 TITELS) 


LEVERING DOOR GEHEEL NEDERLAND 

Ook de programma’s uit 
MSX COMPUTER MAGAZINE 
zijn bij ons verkrijgbaar 


Vraag de gratis prijslijst 


TIME 

SOFT 


Beukenweg 7 
1092 AX Amsterdam 
Tel.: 020-659393 


(bij het Onze Lieve Vrouwen 
Gasthuis en het Oosterpark) 


BATMAN 

14,95 

CHAMPASSEMBLER 

19,90 

CITY CONNECTION 

14,95 

CYBERUN 

14,95 

DESOLATOR 

14,95 

DYNAMITE DAN 

14,95 

ELIDON 

14,95 

737 FLIGHT SIMULATOR 

14,90 

FOOTBALLER OF THE YEAR 

14,95 

FORMULA 1 

9,95 

FUTURE KNIGHT 

14,95 

50 GAMES 

14,95 

GUNFRIGHT 

9,95 

INHERITANCE 

14,95 

JACK THE NIPPER 

14,95 

KILLER TOMATOES 

9,95 

KRACK OUT! 

29,90 

METAL GEAR 

75,00 

NEMESIS 2 

75,00 

NEOS MOUSE + CHEESE 2 

189,00 

OILSWELL 

14,95 

PITFALL 2 

14,95 

PRINT EXPRESS DISK 

99,00 

RIVER RAID 

14,95 

SNAKE RUNNER 

14,95 

TRAIL BLAZER 

14,95 

VERACRUZ 

14,95 

WIZZARDS LAIR 

14,95 

ZORNI 

14,95 















































De sleuven of ‘slofs’ bovenin de MSX blijven een bron van inspiratie voor de MSX-bezitters, die er 
iets meer mee willen dan zomaar een spelletjesmodule er in steken. De fysieke sleuven correspon¬ 
deren met niet tastbare geheugen-slots, waarmee leuke dingen vallen te doen.Naar aanleiding van 
het artikel in MSX-INFO 3/86 is Paul Vanschandevyl in de pen geklommen om ook iets met een Slot 
te doen. 


Sleutel in MSX-slot voor 
beter geheugengebruik 

D e in MSX-INFO nr 3/86 verschenen bijdrage ‘SLOT SELECT IN MSX’ heeft 
Paul aan het werk gezet om ook een sleutel in het ‘MSX-SLOT’ te steken. 

Hij gebruikt de geheugen-mogelijkheden ervan om meer dan één program¬ 
ma in de MSX te stoppen. 


Door het invoeren van een klein ma¬ 
chinetaal routine kan men twee Basic 
programma’s laden en gebruiken! 
Eén ervan komt in pagina 0 en 1 van 
de RAM,het andere in pagina 2 en 3 
van de RAM.De machinetaal routine 
laat ons toe beiden om te wisselen. 
Het programma op pagina 2 en 3 is 
het te runnen programma. 


Dit programma had dezelfde schoon- 
heidsfout als het programma in MSX- 
INFO 3/86. Eén van de twee Basic 
programma’s gaf bij het commando 
‘RUN’ de ‘SYNTAX ERROR’. Maar 
zoals voor veel problemen is de oplos¬ 
sing eenvoudig! Als we een 
PEEK(32768) doen vinden we 255. 
Nu, alle waarden groter dan 0 geven 
de ‘SYNTAX ERROR’ bij ‘RUN’. Dus, 


na het laden van het 2e Basic pro¬ 
gramma geven we in: POKE 32768,0 
en de schoonheidsfout is weg! 

De machinetaal routine brengen we 
onder in de ‘WORKSPACE AREA’. 
Tussen &H FD09 en &H FD88 worden 
de adressen alleen gebruikt als we 
werken met EXTENSION ROM’s. We 
brengen de routine hier onder omdat 
we ze zo mee nemen als we de work- 
space area verplaatsen. 

In het kort de werking: 

0 Als eerste POKE ik met een klein 
Basic programma de machinetaal 
routine. Deze routine, in feite twee 
routines, is op te roepen met USR 0 
en USR 1. Vervolgens toetsen we 
‘NEW’ in daar we dit Basic pro¬ 
gramma niet meer nodig hebben. 
Ten derde toetsen we A=USR0(0) 
in waardoor we de workspace ko¬ 
piëren en onderbrengen in pagina 1 
van de RAM. 

° Nu laden we, bijv. van de cassette, 
ons eerste Basic programma. Ver¬ 
volgens toetsen we A=USR1(0) in 
waardoor: 

°de workspace van pagina 1 naar 
pagina 0 wordt verschoven, 

° het eerste Basic programma van 
pagina twee en zijn workspace van 
pagina 3 in pagina 1 van de RAM 
komt, dan komt de workspace + 
10000 lege adressen van pagina 0 
in pagina 2 en 3. 


RAM 


FFFF 

cooo 
8000 ■ 

4000- 

0000 


65482 

59108 


42767 

32768 

32763 

26389 

26385 

16386 

16379 

10005 

ÏODDI 


6375 lijnen 

10000 
6375 \ 

10000 ^ 
6375 lijnen 

> ÏOOOO lijnen 


16378 lijnen 


Schematische weergave van de memory met de adresblokken en het aantal lijnen, dat 

verplaatst kan worden. 
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Nu laden we ons 2e Basic program¬ 
ma. Als laatste POKE 32768,0 intoet¬ 
sen om de schoonheidsfout weg te 
halen. Nu kunnen we doorgaan. Bij 
een ‘END’ of het uitvoeren van een 
‘CTRL-STOP’. 

Eenvoudig door A=USR1 (0) in te toet¬ 
sen de twee Basic programma’s om¬ 
wisselen. 

Elke routine begint met een ‘DISABLE 
INTERRUPT’ en met het herprogram- 


meren van Slot Select Register zodat 
we in een FULL-RAM configuratie 
werken. De Disable Interrupt belet het 
‘ophangen’ van de computer als we in 
pagina 0 en 1 werken. Op het einde 
van de routine zetten we het Slot Se¬ 
lect Register terug in ROM-RAM en 
doen een CALL naar de ‘END’ routine 
in de ROM. Dit bewerkt dat aller-han- 
de zaken op nul gezet worden. 


Hieronder de machinetaal routine en 
het Basic programma gebruikt om de 
routine onder te brengen in memory. 

Paul Vanschandevyl 

N.B. De getallen 240 en 255 die in het 
A-register komen zijn slechts juist 
voor een RAM in slot-3. Voor een 
RAM in slot 2 worden deze getallen 
160 en 170, voor slot 1 80 en 85 


64777 

64778 

64779 

64780 

64781 

64782 

64783 

64784 

64785 

64786 

64787 

64788 

64789 

64790 

64791 

64792 

64793 

64794 

64795 

64796 

64797 

64798 

64799 

64800 

64801 

64802 

64803 

64804 

64805 

64806 

64807 

64808 

64809 

64810 

64811 

64812 

64813 

64814 

64815 

64816 

64817 

64818 

64819 

64820 

64821 

64822 

64823 

64824 

64825 

64826 

64827 

64828 

64829 

64830 

64831 


Dl 

243 

disable interrupt 

64832 

LD DE,26385 

17 

LD A,255 

62 

255= FULL RAM 

64833 

17 

OUT(),A 

255 


64834 


103 

211 


64835 

LD BC,10000 

1 

LD HL,65482 

168 


64836 

16 

33 

hoogste adres van het 

64837 


39 


202 

te verplaatsen blok 

64838 

LDDR 

237 

LD DE,32763 

255 


64839 


184 

17 

hoogste adres van 

64840 

LD HL,10005 

33 


251 

het nieuwe blok 

64841 

21 

LD BC,6375 

127 


64842 


39 

1 

aantal te verplaatsen 

64843 

LD DE,59108 

17 


231 

lijnen 

64844 

228 

LDDR 

24 


64845 


230 

237 

load decrement 

64846 

LD BC,6375 

1 

LD A,240 

184 

and repeat 

64847 

231 

62 

240 = ROM/RAM 

64848 


24 

OUT(),A 



64849 

LDIR 

237 

211 


64850 


176 

E 1 

168 


64851 

LD HL,2 

33 

251 

enable interrupt 

63EA = END’ routine 

64852 

2 

CALL.63EA 

205 

64853 


0 


234 


64854 

LD DE,32768 

17 

NOP 

99 


64855 

0 

0 


64856 


128 

D 1 

243 

begin 2e routine 

64857 

LD BC,10000 

1 

LD A,255 

62 

64858 

16 

OUT(),A 

255 


64859 


39 

211 


64860 

LDIR 

237 

LD HL,32763 

168 


64861 


176 

33 


64862 

LD A,240 

62 


251 


64863 

240 

LD DE,16379 

127 


64864 

< 

D 

O 

211 

17 


64865 

168 


251 


64866 

El 

251 

LD BC,16378 

63 


64867 

CALL.63EA 

205 

1 


64868 

234 


250 


64869 


99 


63 


64870 

NOP 

0 

LDDR 

237 






184 


beginadres van het te 
verplaatsen blok 

beginadres van het 
nieuwe blok 

aantal te verplaatsen 
lijnen 

load increment 
and repeat 


enable interrupt 


LD HL,65482 33 
202 
255 

LD DE,32763 17 
251 
127 

LD BC.6375 1 

231 
24 

LDDR 237 

184 

LD HL,42767 33 
15 
167 


10 FOR 1=64777! TO 64870! 

20 READ A: POKE l,A: NEXT I 
30 DEFUSR0=64777! 

40 DEFUSR1 =64802! 

50 DATA 243,62,255,211,168,33,202,255,17,251,127 

60 DATA 1,231,24,237,184,62,240,211,168,251,205 

70 DATA 234,99,0,243,62,255,211,168,33,251,127,17 

80 DATA251,63,1,250,63,237,184,33,202,255,17,251 

90 DATA 127,1,231,24,237,184,33,15,167,17,17,103,1 

100 DATA 16,39,237,184,33,21,39,17,228,230,1,231,24 

110 DATA 237,176,33,2,0,17,0,128,1,16,39,237,176,62 

120 DATA 240,211,168,251,205,234,99,0 
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65 








OH ^ 1 


pop 




i 


79 , 


W© 


GAPO^ 


pcs- 


S VST^ 


79 — 

79,— 
79 — 


75 — 
65 — 
75 — 
75 — 
55 — 

45 — 
45 — 
80 — 

150 — 
199 — 


ÜNIEUWÜ 

Neos 

Muis + cheese I (cass.) 

Muis-t-cheese l(rom.) 

Muis + cheese II (disk.) 

Muis + cheese II (rom.) 

Filosoft 

TaswordNed.MSX-1 cass. 

disk. 

Tasword Eng. MSX-1 cass. 
Tasword Ned. MSX-2 disk. 


178,— 
198,— 
224,— 
239 — 


95,— 
115 ,— 
59,— 
149 — 


ÜNIEUWÜ 

Metal Gear 
MSX-1 
Nemesis 
Formula 1-Spirit 

HAL modules 

Music EditorMUE 
Eggerland Mystery 
Dunkshot 
Hole in one(proff.) 

Rollerball 

Pig Mock 
SuperSnake 
Deze twee samen: 

CATTrackball 
Samen met „MUE” 


Konami 


Green Beret 

ƒ 65,— 

Alle modules 

65 — 

Speciale aanbiedingen: 


MonkeyAcademy 

40 — 

Circus Charlie 

40 — 

Mopiranger 

40,— 


Comic Bakery 

40,— 

Twee van de vier bovenstaande titels 

naar keuze: samen 

72,50 

Alle vier samen: slechts 

150,— 

NIEUW 


QBert 

75,— 

PenguinAdventure 

75,— 

Game/Master 

75,— 

TheMaze ofGallius 

75,— 

NIEUW 


MSX-2: 


v'ampire Killer 

75,— 


SALASAN 

Kwaliteitssoftware voor MSX 

Postbus 5570, 1000 AZ Amsterdam 
® 020-273198 


Dealeraanvragen welkom 

Alle prijzen inklusief BTW en verzendkosten. 

Levering bij vooruitbetaling op giro 5641219 van 
Salasan Amsterdam met vermelding van het be¬ 
treffende programma. Rembourszendingen zijn 
mogelijk, maar daarvoor brengen we ƒ 5in reke¬ 
ning. Omruilgarantie voor modules, laadfouten- 
garantie bij cassettes. Uitsluitend originele soft¬ 
ware. 


Alle programma’s werken op MSX-1 
computers, tenzij uitdrukkelijk „MSX-2” 
vermeld wordt. 












Ik liep laatst op een zaterdag met m’n 
vriendin door Zwolle, een beetje win¬ 
kelen en zo, tot ik op de Oude Vismarkt 
BYTE COMPUTERSHOP zag. 

Nu heb ik altijd al een computer willen 
hebben, dus ik naar binnen en m’n vrien¬ 
din verder winkelen. 

Nadat ik over mijn eerste verbazing 
van het werkelijk gigantische aanbod 
bij BYTE heen was kwam ik in gesprek 
met een van die goed ge¬ 
ïnformeerde verkopers. 

Toen ik hem mijn wensen 
had verteld, bleek voor 
mij een MSX het meest 
geschikt te zijn. 

Want daarip zijn zoveel 
mogelijkheden, er is ont¬ 
zettend veel software 
voor, tot echt profes¬ 
sioneel spul toe! 


Nu wilde ik maar wat graag die SONY 
mee naar huis nemen, maar ik had niet 
voldoende geld bij me. 

M’n vriendin, weetje wel. 

Maar dat was helemaal geen probleem, 
want ik kon een Comfort Card krijgen, 
kon ik per maand betalen met heel 
gunstige voorwaarden, dus dat was voor 

mij de uitkomst. 


En BYTE bleek juist nu een 
knaller van een aanbieding 
te hebben: De SONY HBF 700 
MSX-II, met 256 KRam, 128 K 
VideoRam, een ingebouwde 
3 1/2 ” 720 Kb diskdrive, 
een QWERTZ-toetsenbord, met aparte 
cijfertoetsen en een muis. 

Daarbij Hibrid software: tekstverwerker, 
spreadsheet, database, een grafisch 
programma èn een Nederlands MSX 
BASIC-handboek voor f 899,-! 

Bij BYTE viel ik van de ene verbazing 
in de andere, want ze blijken niet alleen 
computers te verkopen, maar ook 
een eigen reparatie- en service 
centrum te hebben waar je met elk 
merk computer terecht kunt. 


Naar BYTE 
voor ’n 
MSX? 
Neem je 
vriendin 
mee 


Toen ik even later met 
de SONY onder mijn armen 
de winkel uitliep, liep ik 
m’n vriendin ook tegen het 
lijf. Ook helemaal bepakt 
en bezakt. Zij was nogal 
verbaasd mij met mijn 
gloednieuwe computer te 
zien. Maar computeren op 
MIJN SONY lukt nog niet, 
omdat mijn vriendin er 
steeds achter zit!! 


Als jij ook een computer 
wilt, of je eigen computer 
wilt inruilen, loop dan ook 

I eens bij een van de BYTE 
m COMPUTERSHOPS naar binnen. 

Maar.... neem dan wel je vriendin mee! 

Mocht je niet zo dicht bij een BYTE 
COMPUTERSHOP in de buurt wonen, dan 
bestel je er gewoon een via hun post¬ 
order service, krijg je de spullen 
thuisbezorgd! 


BYTE COMPUTERSHOPS 
NET IETS BETER! 



Oude Vismarkt 29 038 - 219429 
Zwolle fax: 038-536816 

Steentilstraat 10 
Groningen 050-142097 

Berlikumermarkt 21 
Leeuwarden 058-121210 













Sluit de NMS 8280 op 
uw video-apparatuur aan en u 
hebt een computer met creatief 
talent Met deze geavanceerde 
MSX van Philips mengt en 
monteert u moeiteloos beeld 
en geluid. Voor schuurtjes heeft 
u de keuze uit maar liefst 256 
kleuren. En z’n zakelijk talent is 
al even groot. De administratie doen, gegevensbestanden 
beheren, agenda’s bijhouden, teksten verwerken, uw eigen 
clubblad maken... Het gaat van een leien dakje. 

Voor al deze toepassingen is de software gratis bij¬ 
geleverd. Enkele specificaties: 128 Kb werk- en 128 Kb video- 
geheugen, 2 high-speed dubbelzijdige 3,5" diskette-stations 
met elk een opslagcapaciteit van 720 Kb. De NMS 8280 is één 
van de vele MSX-Homecomputers van Philips. 


Bekendom zijn complete pakket 
randapparatuur en software. 

Beleef zelf hoe prettig 
het werken is met een Philips 
Computer. Bezoek eens de 
Philips Dealer. Schrijf voor uit¬ 
voerige documentatie over 
MSX-Computers, PC’s, randap¬ 
paratuur en monitors aan: 
Philips Consumentenbelangen, Antwoordnummer 500, 

5600 VB Eindhoven. 

PHILIPS COMPUTERS 
VOOR PLEZIER & PROFESSIE 


EengreepuithetuitgebreidePhilipsMSX-assortiment:NMS8245,NMS8280,VG8020, 
NMS 1421, VS 0040, VS 0080, NMS 1431, VKR 6830, SBC 3810. 


PHILIPS 



















